/ Developer CD Series 1996 June: Reference Library / Dev.CD Jun 96 RL / Dev.CD Jun 96 RL.toast / Technical Documentation / develop / develop Issue 14 / develop Issue 14 code / Video Digitizing.sea / Video Digitizing / HackTV & softVdig / HackTV.c

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 08 48 61 63 6b 54 56 | 2e 63 00 00 00 00 00 00 |..HackTV|.c......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 01 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 70 5f 00 | 00 03 98 a7 ce 32 29 a7 |.....p_.|.....2).|
|00000060| ce 32 29 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.2).....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 f8 7f 00 00 |........|........|
|00000080| 2f 2a 0d 09 46 69 6c 65 | 3a 09 09 48 61 63 6b 54 |/*..File|:..HackT|
|00000090| 56 2e 63 0d 0d 09 43 6f | 6e 74 61 69 6e 73 3a 09 |V.c...Co|ntains:.|
|000000a0| 48 61 63 6b 20 54 56 20 | 72 6f 75 74 69 6e 65 73 |Hack TV |routines|
|000000b0| 2e 0d 09 09 09 0d 09 09 | 09 09 52 65 66 65 72 20 |........|..Refer |
|000000c0| 74 6f 20 64 65 76 65 6c | 6f 70 20 49 73 73 75 65 |to devel|op Issue|
|000000d0| 20 31 33 2c 20 22 56 69 | 64 65 6f 20 44 69 67 69 | 13, "Vi|deo Digi|
|000000e0| 74 69 7a 69 6e 67 20 55 | 6e 64 65 72 20 51 75 69 |tizing U|nder Qui|
|000000f0| 63 6b 54 69 6d 65 22 2c | 0d 09 09 09 09 66 6f 72 |ckTime",|.....for|
|00000100| 20 64 65 74 61 69 6c 73 | 20 6f 6e 20 74 68 69 73 | details| on this|
|00000110| 20 63 6f 64 65 2e 0d 09 | 09 09 09 0d 09 09 09 09 | code...|........|
|00000120| 54 68 69 73 20 63 6f 64 | 65 20 72 65 71 75 69 72 |This cod|e requir|
|00000130| 65 73 20 51 75 69 63 6b | 54 69 6d 65 20 31 2e 35 |es Quick|Time 1.5|
|00000140| 2e 0d 0d 09 57 72 69 74 | 74 65 6e 20 62 79 3a 09 |....Writ|ten by:.|
|00000150| 47 61 72 79 20 57 6f 6f | 64 63 6f 63 6b 0d 0d 09 |Gary Woo|dcock...|
|00000160| 43 6f 70 79 72 69 67 68 | 74 3a 09 a9 20 31 39 39 |Copyrigh|t:.. 199|
|00000170| 32 2d 31 39 39 33 20 62 | 79 20 41 70 70 6c 65 20 |2-1993 b|y Apple |
|00000180| 43 6f 6d 70 75 74 65 72 | 2c 20 49 6e 63 2e 0d 0d |Computer|, Inc...|
|00000190| 09 43 68 61 6e 67 65 20 | 48 69 73 74 6f 72 79 20 |.Change |History |
|000001a0| 28 6d 6f 73 74 20 72 65 | 63 65 6e 74 20 66 69 72 |(most re|cent fir|
|000001b0| 73 74 29 3a 0d 0d 2a 2f | 0d 0d 2f 2f 2d 2d 2d 2d |st):..*/|..//----|
|000001c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000200| 2d 2d 2d 0d 2f 2f 20 49 | 6e 63 6c 75 64 65 73 0d |---.// I|ncludes.|
|00000210| 0d 23 69 6e 63 6c 75 64 | 65 20 3c 4d 65 6e 75 73 |.#includ|e <Menus|
|00000220| 2e 68 3e 0d 23 69 6e 63 | 6c 75 64 65 20 3c 57 69 |.h>.#inc|lude <Wi|
|00000230| 6e 64 6f 77 73 2e 68 3e | 0d 23 69 6e 63 6c 75 64 |ndows.h>|.#includ|
|00000240| 65 20 3c 51 75 69 63 6b | 44 72 61 77 2e 68 3e 0d |e <Quick|Draw.h>.|
|00000250| 23 69 6e 63 6c 75 64 65 | 20 3c 4f 53 45 76 65 6e |#include| <OSEven|
|00000260| 74 73 2e 68 3e 0d 23 69 | 6e 63 6c 75 64 65 20 3c |ts.h>.#i|nclude <|
|00000270| 52 65 73 6f 75 72 63 65 | 73 2e 68 3e 0d 23 69 6e |Resource|s.h>.#in|
|00000280| 63 6c 75 64 65 20 3c 44 | 65 73 6b 2e 68 3e 0d 23 |clude <D|esk.h>.#|
|00000290| 69 6e 63 6c 75 64 65 20 | 3c 46 6f 6e 74 73 2e 68 |include |<Fonts.h|
|000002a0| 3e 0d 23 69 6e 63 6c 75 | 64 65 20 3c 54 6f 6f 6c |>.#inclu|de <Tool|
|000002b0| 55 74 69 6c 73 2e 68 3e | 0d 23 69 6e 63 6c 75 64 |Utils.h>|.#includ|
|000002c0| 65 20 3c 51 75 69 63 6b | 54 69 6d 65 43 6f 6d 70 |e <Quick|TimeComp|
|000002d0| 6f 6e 65 6e 74 73 2e 68 | 3e 0d 23 69 6e 63 6c 75 |onents.h|>.#inclu|
|000002e0| 64 65 20 3c 53 63 72 61 | 70 2e 68 3e 0d 23 69 6e |de <Scra|p.h>.#in|
|000002f0| 63 6c 75 64 65 20 3c 50 | 72 69 6e 74 69 6e 67 2e |clude <P|rinting.|
|00000300| 68 3e 0d 23 69 6e 63 6c | 75 64 65 20 3c 45 72 72 |h>.#incl|ude <Err|
|00000310| 6f 72 73 2e 68 3e 0d 23 | 69 6e 63 6c 75 64 65 20 |ors.h>.#|include |
|00000320| 3c 53 79 73 45 71 75 2e | 68 3e 0d 23 69 6e 63 6c |<SysEqu.|h>.#incl|
|00000330| 75 64 65 20 3c 46 6f 6c | 64 65 72 73 2e 68 3e 0d |ude <Fol|ders.h>.|
|00000340| 23 69 6e 63 6c 75 64 65 | 20 3c 53 63 72 69 70 74 |#include| <Script|
|00000350| 2e 68 3e 0d 23 69 6e 63 | 6c 75 64 65 20 3c 4d 65 |.h>.#inc|lude <Me|
|00000360| 6d 6f 72 79 2e 68 3e 0d | 23 69 6e 63 6c 75 64 65 |mory.h>.|#include|
|00000370| 20 3c 47 65 73 74 61 6c | 74 45 71 75 2e 68 3e 0d | <Gestal|tEqu.h>.|
|00000380| 0d 23 69 66 6e 64 65 66 | 20 54 48 49 4e 4b 5f 43 |.#ifndef| THINK_C|
|00000390| 0d 09 23 69 6e 63 6c 75 | 64 65 20 3c 50 61 63 6b |..#inclu|de <Pack|
|000003a0| 61 67 65 73 2e 68 3e 0d | 23 65 6e 64 69 66 20 54 |ages.h>.|#endif T|
|000003b0| 48 49 4e 4b 5f 43 0d 0d | 23 69 6e 63 6c 75 64 65 |HINK_C..|#include|
|000003c0| 20 22 73 6f 66 74 56 64 | 69 67 2e 68 22 0d 0d 2f | "softVd|ig.h"../|
|000003d0| 2f 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |/-------|--------|
|000003e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000400| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000410| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 2f 2f 20 43 6f 6e 73 |--------|.// Cons|
|00000420| 74 61 6e 74 73 0d 0d 2f | 2f 20 4d 65 6e 75 20 62 |tants../|/ Menu b|
|00000430| 61 72 0d 65 6e 75 6d 0d | 7b 0d 09 6b 4d 65 6e 75 |ar.enum.|{..kMenu|
|00000440| 42 61 72 49 44 20 3d 20 | 31 32 38 0d 7d 3b 0d 0d |BarID = |128.};..|
|00000450| 2f 2f 20 4d 65 6e 75 73 | 0d 65 6e 75 6d 0d 7b 0d |// Menus|.enum.{.|
|00000460| 09 6b 41 70 70 6c 65 49 | 44 20 3d 20 31 32 38 2c |.kAppleI|D = 128,|
|00000470| 0d 09 6b 46 69 6c 65 49 | 44 2c 0d 09 6b 45 64 69 |..kFileI|D,..kEdi|
|00000480| 74 49 44 2c 0d 09 6b 4d | 6f 6e 69 74 6f 72 49 44 |tID,..kM|onitorID|
|00000490| 0d 7d 3b 0d 0d 2f 2f 20 | 41 70 70 6c 65 20 6d 65 |.};..// |Apple me|
|000004a0| 6e 75 20 69 74 65 6d 73 | 0d 65 6e 75 6d 0d 7b 0d |nu items|.enum.{.|
|000004b0| 09 6b 41 62 6f 75 74 49 | 74 65 6d 20 3d 20 31 0d |.kAboutI|tem = 1.|
|000004c0| 7d 3b 0d 0d 2f 2f 20 46 | 69 6c 65 20 6d 65 6e 75 |};..// F|ile menu|
|000004d0| 20 69 74 65 6d 73 0d 65 | 6e 75 6d 0d 7b 0d 09 6b | items.e|num.{..k|
|000004e0| 50 61 67 65 53 65 74 75 | 70 49 74 65 6d 20 3d 20 |PageSetu|pItem = |
|000004f0| 31 2c 0d 09 6b 50 72 69 | 6e 74 49 74 65 6d 2c 0d |1,..kPri|ntItem,.|
|00000500| 09 6b 51 75 69 74 49 74 | 65 6d 20 3d 20 34 0d 7d |.kQuitIt|em = 4.}|
|00000510| 3b 0d 0d 2f 2f 20 45 64 | 69 74 20 6d 65 6e 75 20 |;..// Ed|it menu |
|00000520| 69 74 65 6d 73 0d 65 6e | 75 6d 0d 7b 0d 09 6b 55 |items.en|um.{..kU|
|00000530| 6e 64 6f 49 74 65 6d 20 | 3d 20 31 2c 0d 09 6b 43 |ndoItem |= 1,..kC|
|00000540| 75 74 49 74 65 6d 20 3d | 20 33 2c 0d 09 6b 43 6f |utItem =| 3,..kCo|
|00000550| 70 79 49 74 65 6d 2c 0d | 09 6b 50 61 73 74 65 49 |pyItem,.|.kPasteI|
|00000560| 74 65 6d 2c 0d 09 6b 43 | 6c 65 61 72 49 74 65 6d |tem,..kC|learItem|
|00000570| 0d 7d 3b 0d 0d 2f 2f 20 | 4d 6f 6e 69 74 6f 72 20 |.};..// |Monitor |
|00000580| 6d 65 6e 75 20 69 74 65 | 6d 73 0d 65 6e 75 6d 0d |menu ite|ms.enum.|
|00000590| 7b 0d 09 6b 56 69 64 65 | 6f 53 65 74 74 69 6e 67 |{..kVide|oSetting|
|000005a0| 73 49 74 65 6d 20 3d 20 | 31 2c 0d 09 6b 53 6f 75 |sItem = |1,..kSou|
|000005b0| 6e 64 53 65 74 74 69 6e | 67 73 49 74 65 6d 2c 0d |ndSettin|gsItem,.|
|000005c0| 09 6b 51 75 61 72 74 65 | 72 53 69 7a 65 49 74 65 |.kQuarte|rSizeIte|
|000005d0| 6d 20 3d 20 34 2c 0d 09 | 6b 48 61 6c 66 53 69 7a |m = 4,..|kHalfSiz|
|000005e0| 65 49 74 65 6d 2c 0d 09 | 6b 46 75 6c 6c 53 69 7a |eItem,..|kFullSiz|
|000005f0| 65 49 74 65 6d 2c 0d 09 | 6b 52 65 63 6f 72 64 49 |eItem,..|kRecordI|
|00000600| 74 65 6d 20 3d 20 38 0d | 7d 3b 0d 0d 2f 2f 20 44 |tem = 8.|};..// D|
|00000610| 69 61 6c 6f 67 20 49 44 | 73 0d 65 6e 75 6d 0d 7b |ialog ID|s.enum.{|
|00000620| 0d 09 6b 41 62 6f 75 74 | 44 4c 4f 47 49 44 20 3d |..kAbout|DLOGID =|
|00000630| 20 31 32 38 2c 0d 09 6b | 4d 6f 6e 69 74 6f 72 44 | 128,..k|MonitorD|
|00000640| 4c 4f 47 49 44 0d 7d 3b | 0d 0d 2f 2f 20 43 6f 6d |LOGID.};|..// Com|
|00000650| 6d 6f 6e 20 44 49 54 4c | 20 69 74 65 6d 73 0d 65 |mon DITL| items.e|
|00000660| 6e 75 6d 0d 7b 0d 09 6b | 41 62 6f 75 74 4f 4b 42 |num.{..k|AboutOKB|
|00000670| 75 74 74 6f 6e 20 3d 20 | 31 2c 0d 09 6b 41 62 6f |utton = |1,..kAbo|
|00000680| 75 74 4f 4b 42 75 74 74 | 6f 6e 4f 75 74 6c 69 6e |utOKButt|onOutlin|
|00000690| 65 0d 7d 3b 0d 0d 2f 2f | 2d 2d 2d 2d 2d 2d 2d 2d |e.};..//|--------|
|000006a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000006b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000006c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000006d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|000006e0| 2f 2f 20 47 6c 6f 62 61 | 6c 73 0d 0d 4d 65 6e 75 |// Globa|ls..Menu|
|000006f0| 48 61 6e 64 6c 65 09 09 | 09 09 67 41 70 70 6c 65 |Handle..|..gApple|
|00000700| 4d 65 6e 75 3b 0d 4d 65 | 6e 75 48 61 6e 64 6c 65 |Menu;.Me|nuHandle|
|00000710| 09 09 09 09 67 46 69 6c | 65 4d 65 6e 75 3b 0d 4d |....gFil|eMenu;.M|
|00000720| 65 6e 75 48 61 6e 64 6c | 65 09 09 09 09 67 45 64 |enuHandl|e....gEd|
|00000730| 69 74 4d 65 6e 75 3b 0d | 4d 65 6e 75 48 61 6e 64 |itMenu;.|MenuHand|
|00000740| 6c 65 09 09 09 09 67 4d | 6f 6e 69 74 6f 72 4d 65 |le....gM|onitorMe|
|00000750| 6e 75 3b 0d 45 76 65 6e | 74 52 65 63 6f 72 64 09 |nu;.Even|tRecord.|
|00000760| 09 09 09 67 54 68 65 45 | 76 65 6e 74 3b 0d 42 6f |...gTheE|vent;.Bo|
|00000770| 6f 6c 65 61 6e 09 09 09 | 09 09 67 51 75 69 74 46 |olean...|..gQuitF|
|00000780| 6c 61 67 3b 0d 53 65 71 | 47 72 61 62 43 6f 6d 70 |lag;.Seq|GrabComp|
|00000790| 6f 6e 65 6e 74 09 09 67 | 53 65 71 47 72 61 62 62 |onent..g|SeqGrabb|
|000007a0| 65 72 3b 0d 53 47 43 68 | 61 6e 6e 65 6c 09 09 09 |er;.SGCh|annel...|
|000007b0| 09 67 56 69 64 65 6f 43 | 68 61 6e 6e 65 6c 3b 0d |.gVideoC|hannel;.|
|000007c0| 53 47 43 68 61 6e 6e 65 | 6c 09 09 09 09 67 53 6f |SGChanne|l....gSo|
|000007d0| 75 6e 64 43 68 61 6e 6e | 65 6c 3b 0d 57 69 6e 64 |undChann|el;.Wind|
|000007e0| 6f 77 50 74 72 09 09 09 | 09 67 4d 6f 6e 69 74 6f |owPtr...|.gMonito|
|000007f0| 72 3b 0d 52 65 63 74 09 | 09 09 09 09 67 41 63 74 |r;.Rect.|....gAct|
|00000800| 69 76 65 56 69 64 65 6f | 52 65 63 74 3b 0d 50 69 |iveVideo|Rect;.Pi|
|00000810| 63 48 61 6e 64 6c 65 09 | 09 09 09 67 4d 6f 6e 69 |cHandle.|...gMoni|
|00000820| 74 6f 72 50 49 43 54 3b | 0d 42 6f 6f 6c 65 61 6e |torPICT;|.Boolean|
|00000830| 09 09 09 09 09 67 46 75 | 6c 6c 53 69 7a 65 3b 0d |.....gFu|llSize;.|
|00000840| 42 6f 6f 6c 65 61 6e 09 | 09 09 09 09 67 48 61 6c |Boolean.|....gHal|
|00000850| 66 53 69 7a 65 3b 0d 42 | 6f 6f 6c 65 61 6e 09 09 |fSize;.B|oolean..|
|00000860| 09 09 09 67 51 75 61 72 | 74 65 72 53 69 7a 65 3b |...gQuar|terSize;|
|00000870| 0d 54 48 50 72 69 6e 74 | 09 09 09 09 09 67 50 72 |.THPrint|.....gPr|
|00000880| 69 6e 74 52 65 63 3b 0d | 41 6c 69 67 6e 6d 65 6e |intRec;.|Alignmen|
|00000890| 74 50 72 6f 63 52 65 63 | 6f 72 64 50 74 72 09 67 |tProcRec|ordPtr.g|
|000008a0| 53 65 71 47 72 61 62 62 | 65 72 41 6c 69 67 6e 50 |SeqGrabb|erAlignP|
|000008b0| 72 6f 63 3b 0d 56 69 64 | 65 6f 44 69 67 69 74 69 |roc;.Vid|eoDigiti|
|000008c0| 7a 65 72 43 6f 6d 70 6f | 6e 65 6e 74 09 67 56 64 |zerCompo|nent.gVd|
|000008d0| 69 67 3b 0d 0d 2f 2f 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ig;..//-|--------|
|000008e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000008f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000900| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000910| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 2f |--------|------./|
|00000920| 2f 20 50 72 6f 74 6f 74 | 79 70 65 73 0d 0d 73 74 |/ Protot|ypes..st|
|00000930| 61 74 69 63 20 76 6f 69 | 64 0d 44 6f 49 6e 69 74 |atic voi|d.DoInit|
|00000940| 20 28 76 6f 69 64 29 3b | 0d 0d 73 74 61 74 69 63 | (void);|..static|
|00000950| 20 76 6f 69 64 0d 44 6f | 4d 65 6e 75 53 65 74 75 | void.Do|MenuSetu|
|00000960| 70 20 28 76 6f 69 64 29 | 3b 0d 0d 73 74 61 74 69 |p (void)|;..stati|
|00000970| 63 20 76 6f 69 64 0d 48 | 61 6e 64 6c 65 45 76 65 |c void.H|andleEve|
|00000980| 6e 74 20 28 76 6f 69 64 | 29 3b 0d 0d 73 74 61 74 |nt (void|);..stat|
|00000990| 69 63 20 76 6f 69 64 0d | 48 61 6e 64 6c 65 4d 6f |ic void.|HandleMo|
|000009a0| 75 73 65 44 6f 77 6e 09 | 28 76 6f 69 64 29 3b 0d |useDown.|(void);.|
|000009b0| 0d 73 74 61 74 69 63 20 | 76 6f 69 64 0d 41 64 6a |.static |void.Adj|
|000009c0| 75 73 74 4d 65 6e 75 73 | 20 28 76 6f 69 64 29 3b |ustMenus| (void);|
|000009d0| 0d 0d 73 74 61 74 69 63 | 20 76 6f 69 64 0d 45 6e |..static| void.En|
|000009e0| 61 62 6c 65 20 28 48 61 | 6e 64 6c 65 20 6d 65 6e |able (Ha|ndle men|
|000009f0| 75 2c 20 73 68 6f 72 74 | 20 69 74 65 6d 2c 20 42 |u, short| item, B|
|00000a00| 6f 6f 6c 65 61 6e 20 6f | 6b 29 3b 0d 0d 73 74 61 |oolean o|k);..sta|
|00000a10| 74 69 63 20 76 6f 69 64 | 0d 48 61 6e 64 6c 65 4d |tic void|.HandleM|
|00000a20| 65 6e 75 20 28 6c 6f 6e | 67 20 6d 65 6e 75 29 3b |enu (lon|g menu);|
|00000a30| 0d 0d 73 74 61 74 69 63 | 20 76 6f 69 64 0d 44 6f |..static| void.Do|
|00000a40| 41 62 6f 75 74 44 69 61 | 6c 6f 67 20 28 76 6f 69 |AboutDia|log (voi|
|00000a50| 64 29 3b 0d 0d 73 74 61 | 74 69 63 20 76 6f 69 64 |d);..sta|tic void|
|00000a60| 0d 44 6f 51 75 69 74 20 | 28 76 6f 69 64 29 3b 0d |.DoQuit |(void);.|
|00000a70| 0d 70 61 73 63 61 6c 20 | 76 6f 69 64 0d 41 62 6f |.pascal |void.Abo|
|00000a80| 75 74 44 72 61 77 50 72 | 6f 63 20 28 44 69 61 6c |utDrawPr|oc (Dial|
|00000a90| 6f 67 50 74 72 20 74 68 | 65 44 69 61 6c 6f 67 2c |ogPtr th|eDialog,|
|00000aa0| 20 73 68 6f 72 74 20 74 | 68 65 49 74 65 6d 4e 75 | short t|heItemNu|
|00000ab0| 6d 29 3b 0d 0d 73 74 61 | 74 69 63 20 4f 53 45 72 |m);..sta|tic OSEr|
|00000ac0| 72 0d 58 6f 72 52 65 63 | 74 54 6f 52 67 6e 20 28 |r.XorRec|tToRgn (|
|00000ad0| 52 65 63 74 20 2a 73 72 | 63 52 65 63 74 41 2c 20 |Rect *sr|cRectA, |
|00000ae0| 52 65 63 74 20 2a 73 72 | 63 52 65 63 74 42 2c 20 |Rect *sr|cRectB, |
|00000af0| 52 67 6e 48 61 6e 64 6c | 65 20 2a 64 65 73 74 52 |RgnHandl|e *destR|
|00000b00| 67 6e 29 3b 0d 0d 70 61 | 73 63 61 6c 20 42 6f 6f |gn);..pa|scal Boo|
|00000b10| 6c 65 61 6e 0d 53 65 71 | 47 72 61 62 62 65 72 4d |lean.Seq|GrabberM|
|00000b20| 6f 64 61 6c 46 69 6c 74 | 65 72 50 72 6f 63 20 28 |odalFilt|erProc (|
|00000b30| 44 69 61 6c 6f 67 50 74 | 72 20 74 68 65 44 69 61 |DialogPt|r theDia|
|00000b40| 6c 6f 67 2c 20 45 76 65 | 6e 74 52 65 63 6f 72 64 |log, Eve|ntRecord|
|00000b50| 20 2a 74 68 65 45 76 65 | 6e 74 2c 0d 09 73 68 6f | *theEve|nt,..sho|
|00000b60| 72 74 20 2a 69 74 65 6d | 48 69 74 2c 20 6c 6f 6e |rt *item|Hit, lon|
|00000b70| 67 20 72 65 66 43 6f 6e | 29 3b 0d 0d 73 74 61 74 |g refCon|);..stat|
|00000b80| 69 63 20 42 6f 6f 6c 65 | 61 6e 0d 48 61 73 51 75 |ic Boole|an.HasQu|
|00000b90| 69 63 6b 54 69 6d 65 31 | 35 20 28 76 6f 69 64 29 |ickTime1|5 (void)|
|00000ba0| 3b 0d 0d 2f 2f 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |;..//---|--------|
|00000bb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000bc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000be0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 0d 6d 61 |--------|----..ma|
|00000bf0| 69 6e 20 28 76 6f 69 64 | 29 0d 7b 0d 09 2f 2f 20 |in (void|).{..// |
|00000c00| 49 6e 69 74 0d 09 44 6f | 49 6e 69 74 28 29 3b 0d |Init..Do|Init();.|
|00000c10| 09 44 6f 4d 65 6e 75 53 | 65 74 75 70 28 29 3b 0d |.DoMenuS|etup();.|
|00000c20| 09 0d 09 2f 2f 20 45 61 | 74 20 65 76 65 6e 74 73 |...// Ea|t events|
|00000c30| 20 75 6e 74 69 6c 20 64 | 6f 6e 65 0d 09 64 6f 0d | until d|one..do.|
|00000c40| 09 7b 0d 09 09 48 61 6e | 64 6c 65 45 76 65 6e 74 |.{...Han|dleEvent|
|00000c50| 28 29 3b 0d 09 7d 0d 09 | 77 68 69 6c 65 20 28 21 |();..}..|while (!|
|00000c60| 67 51 75 69 74 46 6c 61 | 67 29 3b 0d 09 0d 09 2f |gQuitFla|g);..../|
|00000c70| 2f 20 54 61 6b 65 20 6f | 66 66 2c 20 65 68 3f 0d |/ Take o|ff, eh?.|
|00000c80| 09 45 78 69 74 54 6f 53 | 68 65 6c 6c 28 29 3b 0d |.ExitToS|hell();.|
|00000c90| 7d 0d 0d 2f 2f 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |}..//---|--------|
|00000ca0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000cb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000cc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000cd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 0d 73 74 |--------|----..st|
|00000ce0| 61 74 69 63 20 76 6f 69 | 64 0d 44 6f 49 6e 69 74 |atic voi|d.DoInit|
|00000cf0| 20 28 76 6f 69 64 29 0d | 7b 0d 09 43 6f 6d 70 6f | (void).|{..Compo|
|00000d00| 6e 65 6e 74 44 65 73 63 | 72 69 70 74 69 6f 6e 09 |nentDesc|ription.|
|00000d10| 74 68 65 44 65 73 63 3b | 0d 09 43 6f 6d 70 6f 6e |theDesc;|..Compon|
|00000d20| 65 6e 74 52 65 73 75 6c | 74 09 09 09 72 65 73 75 |entResul|t...resu|
|00000d30| 6c 74 20 3d 20 6e 6f 45 | 72 72 3b 0d 09 43 6f 6d |lt = noE|rr;..Com|
|00000d40| 70 6f 6e 65 6e 74 09 09 | 09 09 73 67 43 6f 6d 70 |ponent..|..sgComp|
|00000d50| 49 44 20 3d 20 30 4c 3b | 0d 09 47 72 61 66 50 74 |ID = 0L;|..GrafPt|
|00000d60| 72 09 09 09 09 09 73 61 | 76 65 64 50 6f 72 74 3b |r.....sa|vedPort;|
|00000d70| 0d 09 43 6f 6d 70 6f 6e | 65 6e 74 09 09 09 09 76 |..Compon|ent....v|
|00000d80| 64 69 67 43 6f 6d 70 49 | 44 3b 09 09 09 2f 2f 20 |digCompI|D;...// |
|00000d90| 6b 63 6b 0d 09 0d 09 2f | 2f 20 53 65 74 20 75 70 |kck..../|/ Set up|
|00000da0| 20 71 75 69 74 20 66 6c | 61 67 0d 09 67 51 75 69 | quit fl|ag..gQui|
|00000db0| 74 46 6c 61 67 20 3d 20 | 66 61 6c 73 65 3b 0d 09 |tFlag = |false;..|
|00000dc0| 0d 09 2f 2f 20 4d 61 63 | 4d 61 6e 74 72 61 aa 0d |..// Mac|Mantra..|
|00000dd0| 09 4d 61 78 41 70 70 6c | 5a 6f 6e 65 28 29 3b 0d |.MaxAppl|Zone();.|
|00000de0| 09 49 6e 69 74 47 72 61 | 66 20 28 26 71 64 2e 74 |.InitGra|f (&qd.t|
|00000df0| 68 65 50 6f 72 74 29 3b | 0d 09 49 6e 69 74 46 6f |hePort);|..InitFo|
|00000e00| 6e 74 73 28 29 3b 0d 09 | 46 6c 75 73 68 45 76 65 |nts();..|FlushEve|
|00000e10| 6e 74 73 20 28 65 76 65 | 72 79 45 76 65 6e 74 2c |nts (eve|ryEvent,|
|00000e20| 20 30 29 3b 0d 09 49 6e | 69 74 57 69 6e 64 6f 77 | 0);..In|itWindow|
|00000e30| 73 28 29 3b 0d 09 49 6e | 69 74 4d 65 6e 75 73 28 |s();..In|itMenus(|
|00000e40| 29 3b 0d 09 54 45 49 6e | 69 74 28 29 3b 0d 09 49 |);..TEIn|it();..I|
|00000e50| 6e 69 74 44 69 61 6c 6f | 67 73 20 28 30 4c 29 3b |nitDialo|gs (0L);|
|00000e60| 0d 09 49 6e 69 74 43 75 | 72 73 6f 72 28 29 3b 0d |..InitCu|rsor();.|
|00000e70| 09 45 6e 74 65 72 4d 6f | 76 69 65 73 28 29 3b 0d |.EnterMo|vies();.|
|00000e80| 09 4d 6f 72 65 4d 61 73 | 74 65 72 73 28 29 3b 0d |.MoreMas|ters();.|
|00000e90| 09 4d 6f 72 65 4d 61 73 | 74 65 72 73 28 29 3b 0d |.MoreMas|ters();.|
|00000ea0| 09 4d 6f 72 65 4d 61 73 | 74 65 72 73 28 29 3b 0d |.MoreMas|ters();.|
|00000eb0| 09 4d 6f 72 65 4d 61 73 | 74 65 72 73 28 29 3b 0d |.MoreMas|ters();.|
|00000ec0| 09 0d 09 2f 2f 20 49 6e | 69 74 20 73 74 75 66 66 |...// In|it stuff|
|00000ed0| 0d 09 67 53 65 71 47 72 | 61 62 62 65 72 20 3d 20 |..gSeqGr|abber = |
|00000ee0| 30 4c 3b 0d 09 67 56 69 | 64 65 6f 43 68 61 6e 6e |0L;..gVi|deoChann|
|00000ef0| 65 6c 20 3d 20 30 4c 3b | 0d 09 67 53 6f 75 6e 64 |el = 0L;|..gSound|
|00000f00| 43 68 61 6e 6e 65 6c 20 | 3d 20 30 4c 3b 0d 09 67 |Channel |= 0L;..g|
|00000f10| 4d 6f 6e 69 74 6f 72 50 | 49 43 54 20 3d 20 6e 69 |MonitorP|ICT = ni|
|00000f20| 6c 3b 0d 09 67 50 72 69 | 6e 74 52 65 63 20 3d 20 |l;..gPri|ntRec = |
|00000f30| 28 54 48 50 72 69 6e 74 | 29 20 4e 65 77 48 61 6e |(THPrint|) NewHan|
|00000f40| 64 6c 65 43 6c 65 61 72 | 20 28 73 69 7a 65 6f 66 |dleClear| (sizeof|
|00000f50| 20 28 54 50 72 69 6e 74 | 29 29 3b 0d 09 0d 09 2f | (TPrint|));..../|
|00000f60| 2f 20 46 69 6e 64 20 61 | 6e 64 20 6f 70 65 6e 20 |/ Find a|nd open |
|00000f70| 61 20 73 65 71 75 65 6e | 63 65 20 67 72 61 62 62 |a sequen|ce grabb|
|00000f80| 65 72 0d 09 74 68 65 44 | 65 73 63 2e 63 6f 6d 70 |er..theD|esc.comp|
|00000f90| 6f 6e 65 6e 74 54 79 70 | 65 20 3d 20 53 65 71 47 |onentTyp|e = SeqG|
|00000fa0| 72 61 62 43 6f 6d 70 6f | 6e 65 6e 74 54 79 70 65 |rabCompo|nentType|
|00000fb0| 3b 0d 09 74 68 65 44 65 | 73 63 2e 63 6f 6d 70 6f |;..theDe|sc.compo|
|00000fc0| 6e 65 6e 74 53 75 62 54 | 79 70 65 20 3d 20 30 4c |nentSubT|ype = 0L|
|00000fd0| 3b 0d 09 74 68 65 44 65 | 73 63 2e 63 6f 6d 70 6f |;..theDe|sc.compo|
|00000fe0| 6e 65 6e 74 4d 61 6e 75 | 66 61 63 74 75 72 65 72 |nentManu|facturer|
|00000ff0| 20 3d 20 27 61 70 70 6c | 27 3b 0d 09 74 68 65 44 | = 'appl|';..theD|
|00001000| 65 73 63 2e 63 6f 6d 70 | 6f 6e 65 6e 74 46 6c 61 |esc.comp|onentFla|
|00001010| 67 73 20 3d 20 30 4c 3b | 0d 09 74 68 65 44 65 73 |gs = 0L;|..theDes|
|00001020| 63 2e 63 6f 6d 70 6f 6e | 65 6e 74 46 6c 61 67 73 |c.compon|entFlags|
|00001030| 4d 61 73 6b 20 3d 20 30 | 4c 3b 09 0d 09 73 67 43 |Mask = 0|L;...sgC|
|00001040| 6f 6d 70 49 44 20 3d 20 | 46 69 6e 64 4e 65 78 74 |ompID = |FindNext|
|00001050| 43 6f 6d 70 6f 6e 65 6e | 74 20 28 6e 69 6c 2c 20 |Componen|t (nil, |
|00001060| 26 74 68 65 44 65 73 63 | 29 3b 0d 09 69 66 20 28 |&theDesc|);..if (|
|00001070| 73 67 43 6f 6d 70 49 44 | 20 21 3d 20 30 4c 29 0d |sgCompID| != 0L).|
|00001080| 09 7b 0d 09 09 67 53 65 | 71 47 72 61 62 62 65 72 |.{...gSe|qGrabber|
|00001090| 20 3d 20 4f 70 65 6e 43 | 6f 6d 70 6f 6e 65 6e 74 | = OpenC|omponent|
|000010a0| 20 28 73 67 43 6f 6d 70 | 49 44 29 3b 0d 09 7d 0d | (sgComp|ID);..}.|
|000010b0| 09 0d 09 2f 2f 20 46 69 | 6e 64 20 74 68 65 20 73 |...// Fi|nd the s|
|000010c0| 6f 66 74 56 64 69 67 0d | 09 23 69 66 64 65 66 20 |oftVdig.|.#ifdef |
|000010d0| 44 45 42 55 47 5f 49 54 | 0d 09 09 76 64 69 67 43 |DEBUG_IT|...vdigC|
|000010e0| 6f 6d 70 49 44 20 3d 20 | 52 65 67 69 73 74 65 72 |ompID = |Register|
|000010f0| 53 6f 66 74 56 64 69 67 | 28 29 3b 0d 09 23 65 6c |SoftVdig|();..#el|
|00001100| 73 65 0d 09 09 74 68 65 | 44 65 73 63 2e 63 6f 6d |se...the|Desc.com|
|00001110| 70 6f 6e 65 6e 74 54 79 | 70 65 20 3d 20 76 69 64 |ponentTy|pe = vid|
|00001120| 65 6f 44 69 67 69 74 69 | 7a 65 72 43 6f 6d 70 6f |eoDigiti|zerCompo|
|00001130| 6e 65 6e 74 54 79 70 65 | 3b 0d 09 09 74 68 65 44 |nentType|;...theD|
|00001140| 65 73 63 2e 63 6f 6d 70 | 6f 6e 65 6e 74 53 75 62 |esc.comp|onentSub|
|00001150| 54 79 70 65 20 3d 20 27 | 73 6f 66 74 27 3b 0d 09 |Type = '|soft';..|
|00001160| 09 74 68 65 44 65 73 63 | 2e 63 6f 6d 70 6f 6e 65 |.theDesc|.compone|
|00001170| 6e 74 4d 61 6e 75 66 61 | 63 74 75 72 65 72 20 3d |ntManufa|cturer =|
|00001180| 20 27 6a 70 68 20 27 3b | 0d 09 09 74 68 65 44 65 | 'jph ';|...theDe|
|00001190| 73 63 2e 63 6f 6d 70 6f | 6e 65 6e 74 46 6c 61 67 |sc.compo|nentFlag|
|000011a0| 73 20 3d 20 30 4c 3b 0d | 09 09 74 68 65 44 65 73 |s = 0L;.|..theDes|
|000011b0| 63 2e 63 6f 6d 70 6f 6e | 65 6e 74 46 6c 61 67 73 |c.compon|entFlags|
|000011c0| 4d 61 73 6b 20 3d 20 30 | 4c 3b 0d 09 09 76 64 69 |Mask = 0|L;...vdi|
|000011d0| 67 43 6f 6d 70 49 44 20 | 3d 20 46 69 6e 64 4e 65 |gCompID |= FindNe|
|000011e0| 78 74 43 6f 6d 70 6f 6e | 65 6e 74 20 28 6e 69 6c |xtCompon|ent (nil|
|000011f0| 2c 20 26 74 68 65 44 65 | 73 63 29 3b 0d 09 09 53 |, &theDe|sc);...S|
|00001200| 65 74 44 65 66 61 75 6c | 74 43 6f 6d 70 6f 6e 65 |etDefaul|tCompone|
|00001210| 6e 74 20 28 76 64 69 67 | 43 6f 6d 70 49 44 2c 20 |nt (vdig|CompID, |
|00001220| 64 65 66 61 75 6c 74 43 | 6f 6d 70 6f 6e 65 6e 74 |defaultC|omponent|
|00001230| 41 6e 79 46 6c 61 67 73 | 41 6e 79 4d 61 6e 75 66 |AnyFlags|AnyManuf|
|00001240| 61 63 74 75 72 65 72 41 | 6e 79 53 75 62 54 79 70 |acturerA|nySubTyp|
|00001250| 65 29 3b 0d 09 23 65 6e | 64 69 66 20 44 45 42 55 |e);..#en|dif DEBU|
|00001260| 47 5f 49 54 0d 0d 09 2f | 2f 20 49 66 20 77 65 20 |G_IT.../|/ If we |
|00001270| 67 6f 74 20 61 20 73 65 | 71 75 65 6e 63 65 20 67 |got a se|quence g|
|00001280| 72 61 62 62 65 72 2c 20 | 73 65 74 20 69 74 20 75 |rabber, |set it u|
|00001290| 70 0d 09 69 66 20 28 67 | 53 65 71 47 72 61 62 62 |p..if (g|SeqGrabb|
|000012a0| 65 72 20 21 3d 20 30 4c | 29 0d 09 7b 0d 09 09 2f |er != 0L|)..{.../|
|000012b0| 2f 20 47 65 74 20 74 68 | 65 20 6d 6f 6e 69 74 6f |/ Get th|e monito|
|000012c0| 72 0d 09 09 67 4d 6f 6e | 69 74 6f 72 20 3d 20 47 |r...gMon|itor = G|
|000012d0| 65 74 4e 65 77 44 69 61 | 6c 6f 67 20 28 6b 4d 6f |etNewDia|log (kMo|
|000012e0| 6e 69 74 6f 72 44 4c 4f | 47 49 44 2c 20 6e 69 6c |nitorDLO|GID, nil|
|000012f0| 2c 20 28 57 69 6e 64 6f | 77 50 74 72 29 20 2d 31 |, (Windo|wPtr) -1|
|00001300| 4c 29 3b 0d 09 09 69 66 | 20 28 67 4d 6f 6e 69 74 |L);...if| (gMonit|
|00001310| 6f 72 20 21 3d 20 6e 69 | 6c 29 0d 09 09 7b 0d 09 |or != ni|l)...{..|
|00001320| 09 09 2f 2f 20 49 6e 69 | 74 69 61 6c 69 7a 65 20 |..// Ini|tialize |
|00001330| 74 68 65 20 73 65 71 75 | 65 6e 63 65 20 67 72 61 |the sequ|ence gra|
|00001340| 62 62 65 72 0d 09 09 09 | 47 65 74 50 6f 72 74 20 |bber....|GetPort |
|00001350| 28 26 73 61 76 65 64 50 | 6f 72 74 29 3b 0d 09 09 |(&savedP|ort);...|
|00001360| 09 53 65 74 50 6f 72 74 | 20 28 67 4d 6f 6e 69 74 |.SetPort| (gMonit|
|00001370| 6f 72 29 3b 0d 09 09 09 | 53 68 6f 77 57 69 6e 64 |or);....|ShowWind|
|00001380| 6f 77 20 28 67 4d 6f 6e | 69 74 6f 72 29 3b 09 09 |ow (gMon|itor);..|
|00001390| 0d 09 09 09 72 65 73 75 | 6c 74 20 3d 20 53 47 49 |....resu|lt = SGI|
|000013a0| 6e 69 74 69 61 6c 69 7a | 65 20 28 67 53 65 71 47 |nitializ|e (gSeqG|
|000013b0| 72 61 62 62 65 72 29 3b | 0d 09 09 09 69 66 20 28 |rabber);|....if (|
|000013c0| 72 65 73 75 6c 74 20 3d | 3d 20 6e 6f 45 72 72 29 |result =|= noErr)|
|000013d0| 0d 09 09 09 7b 0d 09 09 | 09 09 72 65 73 75 6c 74 |....{...|..result|
|000013e0| 20 3d 20 53 47 53 65 74 | 47 57 6f 72 6c 64 20 28 | = SGSet|GWorld (|
|000013f0| 67 53 65 71 47 72 61 62 | 62 65 72 2c 20 28 43 47 |gSeqGrab|ber, (CG|
|00001400| 72 61 66 50 74 72 29 20 | 67 4d 6f 6e 69 74 6f 72 |rafPtr) |gMonitor|
|00001410| 2c 20 6e 69 6c 29 3b 0d | 09 09 09 09 0d 09 09 09 |, nil);.|........|
|00001420| 09 2f 2f 20 47 65 74 20 | 61 20 76 69 64 65 6f 20 |.// Get |a video |
|00001430| 63 68 61 6e 6e 65 6c 0d | 09 09 09 09 72 65 73 75 |channel.|....resu|
|00001440| 6c 74 20 3d 20 53 47 4e | 65 77 43 68 61 6e 6e 65 |lt = SGN|ewChanne|
|00001450| 6c 20 28 67 53 65 71 47 | 72 61 62 62 65 72 2c 20 |l (gSeqG|rabber, |
|00001460| 56 69 64 65 6f 4d 65 64 | 69 61 54 79 70 65 2c 20 |VideoMed|iaType, |
|00001470| 26 67 56 69 64 65 6f 43 | 68 61 6e 6e 65 6c 29 3b |&gVideoC|hannel);|
|00001480| 0d 09 09 09 09 69 66 20 | 28 28 67 56 69 64 65 6f |.....if |((gVideo|
|00001490| 43 68 61 6e 6e 65 6c 20 | 21 3d 20 6e 69 6c 29 20 |Channel |!= nil) |
|000014a0| 26 26 20 28 72 65 73 75 | 6c 74 20 3d 3d 20 6e 6f |&& (resu|lt == no|
|000014b0| 45 72 72 29 29 0d 09 09 | 09 09 7b 0d 09 09 09 09 |Err))...|..{.....|
|000014c0| 09 73 68 6f 72 74 09 77 | 69 64 74 68 3b 0d 09 09 |.short.w|idth;...|
|000014d0| 09 09 09 73 68 6f 72 74 | 09 68 65 69 67 68 74 3b |...short|.height;|
|000014e0| 0d 09 09 09 09 09 0d 09 | 09 09 09 09 67 51 75 61 |........|....gQua|
|000014f0| 72 74 65 72 53 69 7a 65 | 20 3d 20 66 61 6c 73 65 |rterSize| = false|
|00001500| 3b 0d 09 09 09 09 09 67 | 48 61 6c 66 53 69 7a 65 |;......g|HalfSize|
|00001510| 20 3d 20 74 72 75 65 3b | 0d 09 09 09 09 09 67 46 | = true;|......gF|
|00001520| 75 6c 6c 53 69 7a 65 20 | 3d 20 66 61 6c 73 65 3b |ullSize |= false;|
|00001530| 0d 09 09 09 09 09 0d 09 | 09 09 09 09 72 65 73 75 |........|....resu|
|00001540| 6c 74 20 3d 20 53 47 47 | 65 74 53 72 63 56 69 64 |lt = SGG|etSrcVid|
|00001550| 65 6f 42 6f 75 6e 64 73 | 20 28 67 56 69 64 65 6f |eoBounds| (gVideo|
|00001560| 43 68 61 6e 6e 65 6c 2c | 20 26 67 41 63 74 69 76 |Channel,| &gActiv|
|00001570| 65 56 69 64 65 6f 52 65 | 63 74 29 3b 0d 09 09 09 |eVideoRe|ct);....|
|00001580| 09 09 77 69 64 74 68 20 | 3d 20 28 67 41 63 74 69 |..width |= (gActi|
|00001590| 76 65 56 69 64 65 6f 52 | 65 63 74 2e 72 69 67 68 |veVideoR|ect.righ|
|000015a0| 74 20 2d 20 67 41 63 74 | 69 76 65 56 69 64 65 6f |t - gAct|iveVideo|
|000015b0| 52 65 63 74 2e 6c 65 66 | 74 29 20 2f 20 32 3b 0d |Rect.lef|t) / 2;.|
|000015c0| 09 09 09 09 09 68 65 69 | 67 68 74 20 3d 20 28 67 |.....hei|ght = (g|
|000015d0| 41 63 74 69 76 65 56 69 | 64 65 6f 52 65 63 74 2e |ActiveVi|deoRect.|
|000015e0| 62 6f 74 74 6f 6d 20 2d | 20 67 41 63 74 69 76 65 |bottom -| gActive|
|000015f0| 56 69 64 65 6f 52 65 63 | 74 2e 74 6f 70 29 20 2f |VideoRec|t.top) /|
|00001600| 20 32 3b 0d 09 09 09 09 | 09 53 69 7a 65 57 69 6e | 2;.....|.SizeWin|
|00001610| 64 6f 77 20 28 67 4d 6f | 6e 69 74 6f 72 2c 20 77 |dow (gMo|nitor, w|
|00001620| 69 64 74 68 2c 20 68 65 | 69 67 68 74 2c 20 66 61 |idth, he|ight, fa|
|00001630| 6c 73 65 29 3b 0d 09 09 | 09 09 09 0d 09 09 09 09 |lse);...|........|
|00001640| 09 72 65 73 75 6c 74 20 | 3d 20 53 47 53 65 74 43 |.result |= SGSetC|
|00001650| 68 61 6e 6e 65 6c 55 73 | 61 67 65 20 28 67 56 69 |hannelUs|age (gVi|
|00001660| 64 65 6f 43 68 61 6e 6e | 65 6c 2c 20 73 65 71 47 |deoChann|el, seqG|
|00001670| 72 61 62 50 72 65 76 69 | 65 77 20 7c 20 73 65 71 |rabPrevi|ew | seq|
|00001680| 47 72 61 62 52 65 63 6f | 72 64 20 7c 20 73 65 71 |GrabReco|rd | seq|
|00001690| 47 72 61 62 50 6c 61 79 | 44 75 72 69 6e 67 52 65 |GrabPlay|DuringRe|
|000016a0| 63 6f 72 64 29 3b 0d 09 | 09 09 09 09 72 65 73 75 |cord);..|....resu|
|000016b0| 6c 74 20 3d 20 53 47 53 | 65 74 43 68 61 6e 6e 65 |lt = SGS|etChanne|
|000016c0| 6c 42 6f 75 6e 64 73 20 | 28 67 56 69 64 65 6f 43 |lBounds |(gVideoC|
|000016d0| 68 61 6e 6e 65 6c 2c 20 | 26 28 67 4d 6f 6e 69 74 |hannel, |&(gMonit|
|000016e0| 6f 72 2d 3e 70 6f 72 74 | 52 65 63 74 29 29 3b 0d |or->port|Rect));.|
|000016f0| 09 09 09 09 7d 0d 09 09 | 09 09 0d 09 09 09 09 2f |....}...|......./|
|00001700| 2f 20 47 65 74 20 61 20 | 73 6f 75 6e 64 20 63 68 |/ Get a |sound ch|
|00001710| 61 6e 6e 65 6c 0d 09 09 | 09 09 72 65 73 75 6c 74 |annel...|..result|
|00001720| 20 3d 20 53 47 4e 65 77 | 43 68 61 6e 6e 65 6c 20 | = SGNew|Channel |
|00001730| 28 67 53 65 71 47 72 61 | 62 62 65 72 2c 20 53 6f |(gSeqGra|bber, So|
|00001740| 75 6e 64 4d 65 64 69 61 | 54 79 70 65 2c 20 26 67 |undMedia|Type, &g|
|00001750| 53 6f 75 6e 64 43 68 61 | 6e 6e 65 6c 29 3b 0d 09 |SoundCha|nnel);..|
|00001760| 09 09 09 69 66 20 28 28 | 67 53 6f 75 6e 64 43 68 |...if ((|gSoundCh|
|00001770| 61 6e 6e 65 6c 20 21 3d | 20 6e 69 6c 29 20 26 26 |annel !=| nil) &&|
|00001780| 20 28 72 65 73 75 6c 74 | 20 3d 3d 20 6e 6f 45 72 | (result| == noEr|
|00001790| 72 29 29 0d 09 09 09 09 | 7b 0d 09 09 09 09 09 69 |r)).....|{......i|
|000017a0| 66 20 28 48 61 73 51 75 | 69 63 6b 54 69 6d 65 31 |f (HasQu|ickTime1|
|000017b0| 35 28 29 29 0d 09 09 09 | 09 09 7b 0d 09 09 09 09 |5())....|..{.....|
|000017c0| 09 09 2f 2f 20 54 68 65 | 72 65 20 69 73 20 61 20 |..// The|re is a |
|000017d0| 62 75 67 20 69 6e 20 51 | 75 69 63 6b 54 69 6d 65 |bug in Q|uickTime|
|000017e0| 20 31 2e 35 20 77 68 65 | 72 65 20 61 20 53 47 43 | 1.5 whe|re a SGC|
|000017f0| 68 61 6e 6e 65 6c 20 6f | 66 20 74 79 70 65 20 73 |hannel o|f type s|
|00001800| 6f 75 6e 64 0d 09 09 09 | 09 09 09 2f 2f 20 77 69 |ound....|...// wi|
|00001810| 6c 6c 20 72 65 74 75 72 | 6e 20 73 75 63 63 65 73 |ll retur|n succes|
|00001820| 73 66 75 6c 6c 79 20 69 | 66 20 74 68 65 72 65 20 |sfully i|f there |
|00001830| 69 73 20 6e 6f 20 73 6f | 75 6e 64 20 64 72 69 76 |is no so|und driv|
|00001840| 65 72 20 70 72 65 73 65 | 6e 74 2e 0d 09 09 09 09 |er prese|nt......|
|00001850| 09 09 2f 2f 20 54 6f 20 | 67 65 74 20 61 72 6f 75 |..// To |get arou|
|00001860| 6e 64 20 74 68 69 73 2c | 20 69 66 20 77 65 27 72 |nd this,| if we'r|
|00001870| 65 20 72 75 6e 6e 69 6e | 67 20 51 54 20 31 2e 35 |e runnin|g QT 1.5|
|00001880| 2c 20 77 65 20 63 61 6c | 6c 20 0d 09 09 09 09 09 |, we cal|l ......|
|00001890| 09 2f 2f 20 53 47 47 65 | 74 53 6f 75 6e 64 49 6e |.// SGGe|tSoundIn|
|000018a0| 70 75 74 44 72 69 76 65 | 72 20 61 66 74 65 72 20 |putDrive|r after |
|000018b0| 61 20 73 75 63 63 65 73 | 73 66 75 6c 20 53 47 4e |a succes|sful SGN|
|000018c0| 65 77 43 68 61 6e 6e 65 | 6c 20 63 61 6c 6c 20 66 |ewChanne|l call f|
|000018d0| 6f 72 0d 09 09 09 09 09 | 09 2f 2f 20 61 20 73 6f |or......|.// a so|
|000018e0| 75 6e 64 20 63 68 61 6e | 6e 65 6c 20 74 6f 20 66 |und chan|nel to f|
|000018f0| 69 6e 64 20 6f 75 74 20 | 69 66 20 77 65 20 72 65 |ind out |if we re|
|00001900| 61 6c 6c 79 20 67 6f 74 | 20 6f 6e 65 2e 20 20 51 |ally got| one.  Q|
|00001910| 75 69 63 6b 54 69 6d 65 | 0d 09 09 09 09 09 09 2f |uickTime|......./|
|00001920| 2f 20 31 2e 36 20 68 61 | 73 20 66 69 78 65 64 20 |/ 1.6 ha|s fixed |
|00001930| 74 68 69 73 20 70 72 6f | 62 6c 65 6d 2e 0d 09 09 |this pro|blem....|
|00001940| 09 09 09 09 0d 09 09 09 | 09 09 09 73 68 6f 72 74 |........|...short|
|00001950| 09 73 6e 64 44 72 76 72 | 52 65 66 4e 75 6d 20 3d |.sndDrvr|RefNum =|
|00001960| 20 53 47 47 65 74 53 6f | 75 6e 64 49 6e 70 75 74 | SGGetSo|undInput|
|00001970| 44 72 69 76 65 72 20 28 | 67 53 6f 75 6e 64 43 68 |Driver (|gSoundCh|
|00001980| 61 6e 6e 65 6c 29 3b 0d | 09 09 09 09 09 09 0d 09 |annel);.|........|
|00001990| 09 09 09 09 09 69 66 20 | 28 73 6e 64 44 72 76 72 |.....if |(sndDrvr|
|000019a0| 52 65 66 4e 75 6d 20 3d | 3d 20 30 29 0d 09 09 09 |RefNum =|= 0)....|
|000019b0| 09 09 09 7b 0d 09 09 09 | 09 09 09 09 72 65 73 75 |...{....|....resu|
|000019c0| 6c 74 20 3d 20 53 47 44 | 69 73 70 6f 73 65 43 68 |lt = SGD|isposeCh|
|000019d0| 61 6e 6e 65 6c 20 28 67 | 53 65 71 47 72 61 62 62 |annel (g|SeqGrabb|
|000019e0| 65 72 2c 20 67 53 6f 75 | 6e 64 43 68 61 6e 6e 65 |er, gSou|ndChanne|
|000019f0| 6c 29 3b 0d 09 09 09 09 | 09 09 09 67 53 6f 75 6e |l);.....|...gSoun|
|00001a00| 64 43 68 61 6e 6e 65 6c | 20 3d 20 6e 69 6c 3b 0d |dChannel| = nil;.|
|00001a10| 09 09 09 09 09 09 7d 0d | 09 09 09 09 09 7d 0d 09 |......}.|.....}..|
|00001a20| 09 09 09 09 0d 09 09 09 | 09 09 69 66 20 28 67 53 |........|..if (gS|
|00001a30| 6f 75 6e 64 43 68 61 6e | 6e 65 6c 20 21 3d 20 6e |oundChan|nel != n|
|00001a40| 69 6c 29 0d 09 09 09 09 | 09 7b 0d 09 09 09 09 09 |il).....|.{......|
|00001a50| 09 72 65 73 75 6c 74 20 | 3d 20 53 47 53 65 74 43 |.result |= SGSetC|
|00001a60| 68 61 6e 6e 65 6c 55 73 | 61 67 65 20 28 67 53 6f |hannelUs|age (gSo|
|00001a70| 75 6e 64 43 68 61 6e 6e | 65 6c 2c 20 73 65 71 47 |undChann|el, seqG|
|00001a80| 72 61 62 50 72 65 76 69 | 65 77 20 7c 20 73 65 71 |rabPrevi|ew | seq|
|00001a90| 47 72 61 62 52 65 63 6f | 72 64 29 3b 0d 09 09 09 |GrabReco|rd);....|
|00001aa0| 09 09 09 0d 09 09 09 09 | 09 09 2f 2f 20 53 65 74 |........|..// Set|
|00001ab0| 20 74 68 65 20 76 6f 6c | 75 6d 65 20 6c 6f 77 20 | the vol|ume low |
|00001ac0| 74 6f 20 70 72 65 76 65 | 6e 74 20 66 65 65 64 62 |to preve|nt feedb|
|00001ad0| 61 63 6b 20 77 68 65 6e | 20 77 65 20 73 74 61 72 |ack when| we star|
|00001ae0| 74 20 74 68 65 20 70 72 | 65 76 69 65 77 2c 0d 09 |t the pr|eview,..|
|00001af0| 09 09 09 09 09 2f 2f 20 | 69 6e 20 63 61 73 65 20 |.....// |in case |
|00001b00| 74 68 65 20 6d 69 63 20 | 69 73 20 61 6e 79 77 68 |the mic |is anywh|
|00001b10| 65 72 65 20 6e 65 61 72 | 20 74 68 65 20 73 70 65 |ere near| the spe|
|00001b20| 61 6b 65 72 2e 0d 09 09 | 09 09 09 09 72 65 73 75 |aker....|....resu|
|00001b30| 6c 74 20 3d 20 53 47 53 | 65 74 43 68 61 6e 6e 65 |lt = SGS|etChanne|
|00001b40| 6c 56 6f 6c 75 6d 65 20 | 28 67 53 6f 75 6e 64 43 |lVolume |(gSoundC|
|00001b50| 68 61 6e 6e 65 6c 2c 20 | 30 78 30 30 31 30 29 3b |hannel, |0x0010);|
|00001b60| 0d 09 09 09 09 09 7d 0d | 09 09 09 09 7d 0d 09 09 |......}.|....}...|
|00001b70| 09 09 0d 09 09 09 09 2f | 2f 20 47 65 74 20 74 68 |......./|/ Get th|
|00001b80| 65 20 61 6c 69 67 6e 6d | 65 6e 74 20 70 72 6f 63 |e alignm|ent proc|
|00001b90| 20 28 66 6f 72 20 75 73 | 65 20 77 68 65 6e 20 64 | (for us|e when d|
|00001ba0| 72 61 67 67 69 6e 67 20 | 74 68 65 20 6d 6f 6e 69 |ragging |the moni|
|00001bb0| 74 6f 72 29 0d 09 09 09 | 09 72 65 73 75 6c 74 20 |tor)....|.result |
|00001bc0| 3d 20 53 47 47 65 74 41 | 6c 69 67 6e 6d 65 6e 74 |= SGGetA|lignment|
|00001bd0| 50 72 6f 63 20 28 67 53 | 65 71 47 72 61 62 62 65 |Proc (gS|eqGrabbe|
|00001be0| 72 2c 20 67 53 65 71 47 | 72 61 62 62 65 72 41 6c |r, gSeqG|rabberAl|
|00001bf0| 69 67 6e 50 72 6f 63 29 | 3b 0d 09 09 09 09 0d 09 |ignProc)|;.......|
|00001c00| 09 09 09 2f 2f 20 47 65 | 74 20 72 65 61 64 79 c9 |...// Ge|t ready.|
|00001c10| 0d 09 09 09 09 2f 2f 20 | 72 65 73 75 6c 74 20 3d |.....// |result =|
|00001c20| 20 53 47 50 72 65 70 61 | 72 65 20 28 67 53 65 71 | SGPrepa|re (gSeq|
|00001c30| 47 72 61 62 62 65 72 2c | 20 74 72 75 65 2c 20 74 |Grabber,| true, t|
|00001c40| 72 75 65 29 3b 0d 09 09 | 09 7d 0d 09 09 09 0d 09 |rue);...|.}......|
|00001c50| 09 09 2f 2f 20 47 6f 21 | 0d 09 09 09 69 66 28 72 |..// Go!|....if(r|
|00001c60| 65 73 75 6c 74 20 3d 3d | 20 6e 6f 45 72 72 29 20 |esult ==| noErr) |
|00001c70| 72 65 73 75 6c 74 20 3d | 20 53 47 53 74 61 72 74 |result =| SGStart|
|00001c80| 50 72 65 76 69 65 77 20 | 28 67 53 65 71 47 72 61 |Preview |(gSeqGra|
|00001c90| 62 62 65 72 29 3b 0d 09 | 09 09 53 65 74 50 6f 72 |bber);..|..SetPor|
|00001ca0| 74 20 28 73 61 76 65 64 | 50 6f 72 74 29 3b 0d 09 |t (saved|Port);..|
|00001cb0| 09 7d 0d 09 7d 0d 7d 0d | 0d 2f 2f 2d 2d 2d 2d 2d |.}..}.}.|.//-----|
|00001cc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001cd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001ce0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001cf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001d00| 2d 2d 0d 0d 73 74 61 74 | 69 63 20 76 6f 69 64 0d |--..stat|ic void.|
|00001d10| 44 6f 4d 65 6e 75 53 65 | 74 75 70 20 28 76 6f 69 |DoMenuSe|tup (voi|
|00001d20| 64 29 0d 7b 09 0d 09 48 | 61 6e 64 6c 65 09 74 68 |d).{...H|andle.th|
|00001d30| 65 4d 65 6e 75 42 61 72 | 20 3d 20 47 65 74 4e 65 |eMenuBar| = GetNe|
|00001d40| 77 4d 42 61 72 20 28 6b | 4d 65 6e 75 42 61 72 49 |wMBar (k|MenuBarI|
|00001d50| 44 29 3b 0d 09 0d 09 2f | 2f 20 53 65 74 20 75 70 |D);..../|/ Set up|
|00001d60| 20 6f 75 72 20 6d 65 6e | 75 73 0d 09 53 65 74 4d | our men|us..SetM|
|00001d70| 65 6e 75 42 61 72 20 28 | 74 68 65 4d 65 6e 75 42 |enuBar (|theMenuB|
|00001d80| 61 72 29 3b 0d 09 67 41 | 70 70 6c 65 4d 65 6e 75 |ar);..gA|ppleMenu|
|00001d90| 20 3d 20 47 65 74 4d 48 | 61 6e 64 6c 65 20 28 6b | = GetMH|andle (k|
|00001da0| 41 70 70 6c 65 49 44 29 | 3b 0d 09 67 46 69 6c 65 |AppleID)|;..gFile|
|00001db0| 4d 65 6e 75 20 3d 20 47 | 65 74 4d 48 61 6e 64 6c |Menu = G|etMHandl|
|00001dc0| 65 20 28 6b 46 69 6c 65 | 49 44 29 3b 0d 09 67 45 |e (kFile|ID);..gE|
|00001dd0| 64 69 74 4d 65 6e 75 20 | 3d 20 47 65 74 4d 48 61 |ditMenu |= GetMHa|
|00001de0| 6e 64 6c 65 20 28 6b 45 | 64 69 74 49 44 29 3b 0d |ndle (kE|ditID);.|
|00001df0| 09 67 4d 6f 6e 69 74 6f | 72 4d 65 6e 75 20 3d 20 |.gMonito|rMenu = |
|00001e00| 47 65 74 4d 48 61 6e 64 | 6c 65 20 28 6b 4d 6f 6e |GetMHand|le (kMon|
|00001e10| 69 74 6f 72 49 44 29 3b | 0d 09 41 64 64 52 65 73 |itorID);|..AddRes|
|00001e20| 4d 65 6e 75 20 28 67 41 | 70 70 6c 65 4d 65 6e 75 |Menu (gA|ppleMenu|
|00001e30| 2c 20 27 44 52 56 52 27 | 29 3b 0d 09 0d 09 2f 2f |, 'DRVR'|);....//|
|00001e40| 20 4c 61 73 74 20 6d 69 | 6e 75 74 65 20 61 64 6a | Last mi|nute adj|
|00001e50| 75 73 74 6d 65 6e 74 73 | c9 0d 09 41 64 6a 75 73 |ustments|...Adjus|
|00001e60| 74 4d 65 6e 75 73 28 29 | 3b 0d 7d 0d 0d 2f 2f 2d |tMenus()|;.}..//-|
|00001e70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001e80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001e90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001ea0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001eb0| 2d 2d 2d 2d 2d 2d 0d 0d | 73 74 61 74 69 63 20 76 |------..|static v|
|00001ec0| 6f 69 64 0d 48 61 6e 64 | 6c 65 45 76 65 6e 74 20 |oid.Hand|leEvent |
|00001ed0| 28 76 6f 69 64 29 0d 7b | 0d 09 43 6f 6d 70 6f 6e |(void).{|..Compon|
|00001ee0| 65 6e 74 52 65 73 75 6c | 74 09 72 65 73 75 6c 74 |entResul|t.result|
|00001ef0| 20 3d 20 6e 6f 45 72 72 | 3b 0d 0d 09 2f 2f 20 44 | = noErr|;...// D|
|00001f00| 6f 20 73 79 73 74 65 6d | 20 73 74 75 66 66 0d 09 |o system| stuff..|
|00001f10| 48 69 6c 69 74 65 4d 65 | 6e 75 20 28 30 29 3b 0d |HiliteMe|nu (0);.|
|00001f20| 09 53 79 73 74 65 6d 54 | 61 73 6b 28 29 3b 0d 09 |.SystemT|ask();..|
|00001f30| 0d 09 2f 2f 20 47 69 76 | 65 20 73 6f 6d 65 20 74 |..// Giv|e some t|
|00001f40| 69 6d 65 20 74 6f 20 74 | 68 65 20 73 65 71 75 65 |ime to t|he seque|
|00001f50| 6e 63 65 20 67 72 61 62 | 62 65 72 0d 09 69 66 20 |nce grab|ber..if |
|00001f60| 28 67 53 65 71 47 72 61 | 62 62 65 72 20 21 3d 20 |(gSeqGra|bber != |
|00001f70| 30 4c 29 0d 09 09 72 65 | 73 75 6c 74 20 3d 20 53 |0L)...re|sult = S|
|00001f80| 47 49 64 6c 65 20 28 67 | 53 65 71 47 72 61 62 62 |GIdle (g|SeqGrabb|
|00001f90| 65 72 29 3b 0d 09 0d 09 | 2f 2f 20 53 75 63 6b 20 |er);....|// Suck |
|00001fa0| 61 6e 20 65 76 65 6e 74 | 0d 09 69 66 20 28 57 61 |an event|..if (Wa|
|00001fb0| 69 74 4e 65 78 74 45 76 | 65 6e 74 20 28 65 76 65 |itNextEv|ent (eve|
|00001fc0| 72 79 45 76 65 6e 74 2c | 20 26 67 54 68 65 45 76 |ryEvent,| &gTheEv|
|00001fd0| 65 6e 74 2c 20 30 2c 20 | 30 29 29 0d 09 7b 0d 09 |ent, 0, |0))..{..|
|00001fe0| 09 2f 2f 20 57 68 61 74 | 20 77 61 73 20 69 74 3f |.// What| was it?|
|00001ff0| 0d 09 09 73 77 69 74 63 | 68 20 28 67 54 68 65 45 |...switc|h (gTheE|
|00002000| 76 65 6e 74 2e 77 68 61 | 74 29 0d 09 09 7b 0d 09 |vent.wha|t)...{..|
|00002010| 09 09 63 61 73 65 20 6d | 6f 75 73 65 44 6f 77 6e |..case m|ouseDown|
|00002020| 3a 0d 09 09 09 7b 0d 09 | 09 09 09 2f 2f 20 48 61 |:....{..|...// Ha|
|00002030| 6e 64 6c 65 20 69 74 0d | 09 09 09 09 48 61 6e 64 |ndle it.|....Hand|
|00002040| 6c 65 4d 6f 75 73 65 44 | 6f 77 6e 28 29 3b 0d 09 |leMouseD|own();..|
|00002050| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 09 7d 0d 09 |...break|;....}..|
|00002060| 09 09 63 61 73 65 20 6b | 65 79 44 6f 77 6e 3a 0d |..case k|eyDown:.|
|00002070| 09 09 09 63 61 73 65 20 | 61 75 74 6f 4b 65 79 3a |...case |autoKey:|
|00002080| 0d 09 09 09 7b 0d 09 09 | 09 09 63 68 61 72 09 74 |....{...|..char.t|
|00002090| 68 65 43 68 61 72 20 3d | 20 67 54 68 65 45 76 65 |heChar =| gTheEve|
|000020a0| 6e 74 2e 6d 65 73 73 61 | 67 65 20 26 20 63 68 61 |nt.messa|ge & cha|
|000020b0| 72 43 6f 64 65 4d 61 73 | 6b 3b 0d 09 09 09 09 6c |rCodeMas|k;.....l|
|000020c0| 6f 6e 67 09 74 68 65 4d | 65 6e 75 20 3d 20 4d 65 |ong.theM|enu = Me|
|000020d0| 6e 75 4b 65 79 20 28 74 | 68 65 43 68 61 72 29 3b |nuKey (t|heChar);|
|000020e0| 0d 0d 09 09 09 09 2f 2f | 20 48 61 6e 64 6c 65 20 |......//| Handle |
|000020f0| 6d 65 6e 75 20 63 6f 6d | 6d 61 6e 64 20 6b 65 79 |menu com|mand key|
|00002100| 73 0d 09 09 09 09 48 61 | 6e 64 6c 65 4d 65 6e 75 |s.....Ha|ndleMenu|
|00002110| 20 28 74 68 65 4d 65 6e | 75 29 3b 09 09 09 09 0d | (theMen|u);.....|
|00002120| 09 09 09 09 62 72 65 61 | 6b 3b 0d 09 09 09 7d 0d |....brea|k;....}.|
|00002130| 09 09 09 63 61 73 65 20 | 75 70 64 61 74 65 45 76 |...case |updateEv|
|00002140| 74 3a 0d 09 09 09 7b 0d | 09 09 09 09 69 66 20 28 |t:....{.|....if (|
|00002150| 28 67 4d 6f 6e 69 74 6f | 72 20 21 3d 20 6e 69 6c |(gMonito|r != nil|
|00002160| 29 20 26 26 20 28 28 57 | 69 6e 64 6f 77 50 74 72 |) && ((W|indowPtr|
|00002170| 29 20 28 67 54 68 65 45 | 76 65 6e 74 2e 6d 65 73 |) (gTheE|vent.mes|
|00002180| 73 61 67 65 29 20 3d 3d | 20 28 57 69 6e 64 6f 77 |sage) ==| (Window|
|00002190| 50 74 72 29 20 67 4d 6f | 6e 69 74 6f 72 29 29 0d |Ptr) gMo|nitor)).|
|000021a0| 09 09 09 09 7b 0d 09 09 | 09 09 09 2f 2f 20 45 61 |....{...|...// Ea|
|000021b0| 74 20 74 68 65 20 75 70 | 64 61 74 65 0d 09 09 09 |t the up|date....|
|000021c0| 09 09 42 65 67 69 6e 55 | 70 64 61 74 65 20 28 67 |..BeginU|pdate (g|
|000021d0| 4d 6f 6e 69 74 6f 72 29 | 3b 0d 09 09 09 09 09 45 |Monitor)|;......E|
|000021e0| 6e 64 55 70 64 61 74 65 | 20 28 67 4d 6f 6e 69 74 |ndUpdate| (gMonit|
|000021f0| 6f 72 29 3b 0d 09 09 09 | 09 7d 0d 09 09 09 09 62 |or);....|.}.....b|
|00002200| 72 65 61 6b 3b 0d 09 09 | 09 7d 0d 09 09 09 64 65 |reak;...|.}....de|
|00002210| 66 61 75 6c 74 3a 09 2f | 2f 20 57 65 20 64 6f 6e |fault:./|/ We don|
|00002220| 27 74 20 72 65 61 6c 6c | 79 20 63 61 72 65 20 61 |'t reall|y care a|
|00002230| 62 6f 75 74 20 61 6e 79 | 20 6f 74 68 65 72 20 65 |bout any| other e|
|00002240| 76 65 6e 74 73 2c 20 62 | 75 74 20 79 6f 75 20 6d |vents, b|ut you m|
|00002250| 69 67 68 74 2c 20 73 6f | 20 66 65 65 6c 20 66 72 |ight, so| feel fr|
|00002260| 65 65 0d 09 09 09 7b 0d | 09 09 09 09 62 72 65 61 |ee....{.|....brea|
|00002270| 6b 3b 0d 09 09 09 7d 0d | 09 09 7d 0d 09 7d 0d 7d |k;....}.|..}..}.}|
|00002280| 0d 0d 2f 2f 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..//----|--------|
|00002290| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000022a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000022b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000022c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0d 73 74 61 |--------|---..sta|
|000022d0| 74 69 63 20 76 6f 69 64 | 0d 48 61 6e 64 6c 65 4d |tic void|.HandleM|
|000022e0| 6f 75 73 65 44 6f 77 6e | 20 28 76 6f 69 64 29 0d |ouseDown| (void).|
|000022f0| 7b 09 0d 09 57 69 6e 64 | 6f 77 50 74 72 09 74 68 |{...Wind|owPtr.th|
|00002300| 65 57 69 6e 64 6f 77 3b | 0d 09 73 68 6f 72 74 09 |eWindow;|..short.|
|00002310| 09 77 69 6e 64 6f 77 43 | 6f 64 65 20 3d 20 46 69 |.windowC|ode = Fi|
|00002320| 6e 64 57 69 6e 64 6f 77 | 20 28 67 54 68 65 45 76 |ndWindow| (gTheEv|
|00002330| 65 6e 74 2e 77 68 65 72 | 65 2c 20 26 74 68 65 57 |ent.wher|e, &theW|
|00002340| 69 6e 64 6f 77 29 3b 0d | 09 0d 09 2f 2f 20 57 68 |indow);.|...// Wh|
|00002350| 65 72 65 20 77 61 73 20 | 74 68 65 20 6d 6f 75 73 |ere was |the mous|
|00002360| 65 20 64 6f 77 6e 3f 0d | 20 20 20 20 73 77 69 74 |e down?.|    swit|
|00002370| 63 68 20 28 77 69 6e 64 | 6f 77 43 6f 64 65 29 0d |ch (wind|owCode).|
|00002380| 09 7b 0d 09 09 63 61 73 | 65 20 69 6e 53 79 73 57 |.{...cas|e inSysW|
|00002390| 69 6e 64 6f 77 3a 0d 09 | 09 7b 20 0d 09 09 09 53 |indow:..|.{ ....S|
|000023a0| 79 73 74 65 6d 43 6c 69 | 63 6b 20 28 26 67 54 68 |ystemCli|ck (&gTh|
|000023b0| 65 45 76 65 6e 74 2c 20 | 74 68 65 57 69 6e 64 6f |eEvent, |theWindo|
|000023c0| 77 29 3b 0d 09 09 20 20 | 20 20 62 72 65 61 6b 3b |w);...  |  break;|
|000023d0| 0d 09 20 20 20 20 7d 0d | 09 09 63 61 73 65 20 69 |..    }.|..case i|
|000023e0| 6e 4d 65 6e 75 42 61 72 | 3a 0d 09 09 7b 0d 09 09 |nMenuBar|:...{...|
|000023f0| 09 41 64 6a 75 73 74 4d | 65 6e 75 73 28 29 3b 0d |.AdjustM|enus();.|
|00002400| 09 09 09 48 61 6e 64 6c | 65 4d 65 6e 75 20 28 30 |...Handl|eMenu (0|
|00002410| 4c 29 3b 0d 09 09 09 62 | 72 65 61 6b 3b 0d 09 09 |L);....b|reak;...|
|00002420| 7d 0d 09 09 63 61 73 65 | 20 69 6e 44 72 61 67 3a |}...case| inDrag:|
|00002430| 0d 09 09 7b 0d 09 09 09 | 2f 2f 20 57 61 73 20 69 |...{....|// Was i|
|00002440| 74 20 74 68 65 20 6d 6f | 6e 69 74 6f 72 3f 0d 09 |t the mo|nitor?..|
|00002450| 09 09 69 66 20 28 74 68 | 65 57 69 6e 64 6f 77 20 |..if (th|eWindow |
|00002460| 3d 3d 20 67 4d 6f 6e 69 | 74 6f 72 29 0d 09 09 09 |== gMoni|tor)....|
|00002470| 7b 0d 09 09 09 09 43 6f | 6d 70 6f 6e 65 6e 74 52 |{.....Co|mponentR|
|00002480| 65 73 75 6c 74 09 72 65 | 73 75 6c 74 20 3d 20 6e |esult.re|sult = n|
|00002490| 6f 45 72 72 3b 0d 09 09 | 09 09 52 65 63 74 09 09 |oErr;...|..Rect..|
|000024a0| 09 6c 69 6d 69 74 52 65 | 63 74 3b 0d 09 09 09 09 |.limitRe|ct;.....|
|000024b0| 52 67 6e 48 61 6e 64 6c | 65 09 09 67 72 61 79 52 |RgnHandl|e..grayR|
|000024c0| 67 6e 20 3d 20 47 65 74 | 47 72 61 79 52 67 6e 28 |gn = Get|GrayRgn(|
|000024d0| 29 3b 0d 09 09 09 09 52 | 65 63 74 09 09 09 62 6f |);.....R|ect...bo|
|000024e0| 75 6e 64 73 52 65 63 74 | 3b 0d 09 09 09 09 0d 09 |undsRect|;.......|
|000024f0| 09 09 09 2f 2f 20 46 69 | 6e 64 20 62 6f 75 6e 64 |...// Fi|nd bound|
|00002500| 73 0d 09 09 09 09 69 66 | 20 28 67 72 61 79 52 67 |s.....if| (grayRg|
|00002510| 6e 20 21 3d 20 6e 69 6c | 29 0d 09 09 09 09 7b 0d |n != nil|).....{.|
|00002520| 09 09 09 09 09 6c 69 6d | 69 74 52 65 63 74 20 3d |.....lim|itRect =|
|00002530| 20 28 2a 67 72 61 79 52 | 67 6e 29 2d 3e 72 67 6e | (*grayR|gn)->rgn|
|00002540| 42 42 6f 78 3b 0d 09 09 | 09 09 7d 0d 09 09 09 09 |BBox;...|..}.....|
|00002550| 65 6c 73 65 0d 09 09 09 | 09 7b 0d 09 09 09 09 09 |else....|.{......|
|00002560| 6c 69 6d 69 74 52 65 63 | 74 20 3d 20 71 64 2e 73 |limitRec|t = qd.s|
|00002570| 63 72 65 65 6e 42 69 74 | 73 2e 62 6f 75 6e 64 73 |creenBit|s.bounds|
|00002580| 3b 0d 09 09 09 09 7d 0d | 09 09 09 09 0d 09 09 09 |;.....}.|........|
|00002590| 09 2f 2f 20 50 61 75 73 | 65 20 74 68 65 20 73 65 |.// Paus|e the se|
|000025a0| 71 75 65 6e 63 65 20 67 | 72 61 62 62 65 72 0d 09 |quence g|rabber..|
|000025b0| 09 09 09 72 65 73 75 6c | 74 20 3d 20 53 47 50 61 |...resul|t = SGPa|
|000025c0| 75 73 65 20 28 67 53 65 | 71 47 72 61 62 62 65 72 |use (gSe|qGrabber|
|000025d0| 2c 20 74 72 75 65 29 3b | 0d 09 09 09 09 0d 09 09 |, true);|........|
|000025e0| 09 09 69 66 20 28 67 56 | 69 64 65 6f 43 68 61 6e |..if (gV|ideoChan|
|000025f0| 6e 65 6c 20 21 3d 20 6e | 69 6c 29 0d 09 09 09 09 |nel != n|il).....|
|00002600| 7b 0d 09 09 09 09 09 2f | 2f 20 44 72 61 67 20 69 |{....../|/ Drag i|
|00002610| 74 20 77 69 74 68 20 74 | 68 65 20 74 6f 74 61 6c |t with t|he total|
|00002620| 6c 79 20 63 6f 6f 6c 20 | 44 72 61 67 41 6c 69 67 |ly cool |DragAlig|
|00002630| 6e 65 64 57 69 6e 64 6f | 77 0d 09 20 20 09 09 09 |nedWindo|w..  ...|
|00002640| 09 2f 2f 20 4e 6f 74 65 | 20 74 68 61 74 20 74 68 |.// Note| that th|
|00002650| 65 20 73 65 71 75 65 6e | 63 65 20 67 72 61 62 62 |e sequen|ce grabb|
|00002660| 65 72 20 63 61 6e 20 67 | 65 74 20 72 65 61 6c 20 |er can g|et real |
|00002670| 63 6f 6e 66 75 73 65 64 | 20 77 68 65 6e 20 79 6f |confused| when yo|
|00002680| 75 20 75 73 65 20 74 68 | 69 73 0d 09 20 20 09 09 |u use th|is..  ..|
|00002690| 09 09 2f 2f 20 63 61 6c | 6c 20 69 66 20 79 6f 75 |..// cal|l if you|
|000026a0| 27 76 65 20 67 6f 74 20 | 6d 75 6c 74 69 70 6c 65 |'ve got |multiple|
|000026b0| 20 76 69 64 65 6f 20 63 | 68 61 6e 6e 65 6c 73 20 | video c|hannels |
|000026c0| 2d 20 74 68 69 73 27 6c | 6c 20 67 65 74 20 66 69 |- this'l|l get fi|
|000026d0| 78 65 64 20 69 6e 20 74 | 68 65 20 0d 09 20 20 09 |xed in t|he ..  .|
|000026e0| 09 09 09 2f 2f 20 6e 65 | 78 74 20 72 65 6c 65 61 |...// ne|xt relea|
|000026f0| 73 65 2e 20 20 0d 09 20 | 20 09 09 09 09 72 65 73 |se.  .. | ....res|
|00002700| 75 6c 74 20 3d 20 53 47 | 47 65 74 43 68 61 6e 6e |ult = SG|GetChann|
|00002710| 65 6c 42 6f 75 6e 64 73 | 20 28 67 56 69 64 65 6f |elBounds| (gVideo|
|00002720| 43 68 61 6e 6e 65 6c 2c | 20 26 62 6f 75 6e 64 73 |Channel,| &bounds|
|00002730| 52 65 63 74 29 3b 0d 09 | 09 09 09 09 44 72 61 67 |Rect);..|....Drag|
|00002740| 41 6c 69 67 6e 65 64 57 | 69 6e 64 6f 77 20 28 74 |AlignedW|indow (t|
|00002750| 68 65 57 69 6e 64 6f 77 | 2c 20 67 54 68 65 45 76 |heWindow|, gTheEv|
|00002760| 65 6e 74 2e 77 68 65 72 | 65 2c 20 26 6c 69 6d 69 |ent.wher|e, &limi|
|00002770| 74 52 65 63 74 2c 20 26 | 62 6f 75 6e 64 73 52 65 |tRect, &|boundsRe|
|00002780| 63 74 2c 20 67 53 65 71 | 47 72 61 62 62 65 72 41 |ct, gSeq|GrabberA|
|00002790| 6c 69 67 6e 50 72 6f 63 | 29 3b 0d 09 09 09 09 7d |lignProc|);.....}|
|000027a0| 0d 09 09 09 09 65 6c 73 | 65 0d 09 09 09 09 7b 0d |.....els|e.....{.|
|000027b0| 09 09 09 09 09 44 72 61 | 67 57 69 6e 64 6f 77 20 |.....Dra|gWindow |
|000027c0| 28 74 68 65 57 69 6e 64 | 6f 77 2c 20 67 54 68 65 |(theWind|ow, gThe|
|000027d0| 45 76 65 6e 74 2e 77 68 | 65 72 65 2c 20 26 6c 69 |Event.wh|ere, &li|
|000027e0| 6d 69 74 52 65 63 74 29 | 3b 0d 09 09 09 09 7d 0d |mitRect)|;.....}.|
|000027f0| 09 09 09 09 0d 09 09 09 | 09 2f 2f 20 53 74 61 72 |........|.// Star|
|00002800| 74 20 75 70 20 74 68 65 | 20 73 65 71 75 65 6e 63 |t up the| sequenc|
|00002810| 65 20 67 72 61 62 62 65 | 72 0d 09 09 09 09 72 65 |e grabbe|r.....re|
|00002820| 73 75 6c 74 20 3d 20 53 | 47 50 61 75 73 65 20 28 |sult = S|GPause (|
|00002830| 67 53 65 71 47 72 61 62 | 62 65 72 2c 20 66 61 6c |gSeqGrab|ber, fal|
|00002840| 73 65 29 3b 0d 09 09 09 | 7d 0d 09 09 09 62 72 65 |se);....|}....bre|
|00002850| 61 6b 3b 0d 09 09 7d 0d | 09 20 20 20 20 64 65 66 |ak;...}.|.    def|
|00002860| 61 75 6c 74 3a 0d 09 20 | 20 20 20 7b 0d 09 20 20 |ault:.. |   {..  |
|00002870| 20 20 09 62 72 65 61 6b | 3b 0d 09 20 20 20 20 7d |  .break|;..    }|
|00002880| 0d 09 7d 0d 7d 0d 0d 2f | 2f 2d 2d 2d 2d 2d 2d 2d |..}.}../|/-------|
|00002890| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000028a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000028b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000028c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000028d0| 0d 0d 73 74 61 74 69 63 | 20 76 6f 69 64 0d 41 64 |..static| void.Ad|
|000028e0| 6a 75 73 74 4d 65 6e 75 | 73 20 28 76 6f 69 64 29 |justMenu|s (void)|
|000028f0| 0d 7b 0d 09 72 65 67 69 | 73 74 65 72 20 57 69 6e |.{..regi|ster Win|
|00002900| 64 6f 77 50 65 65 6b 09 | 09 77 70 20 3d 20 6e 69 |dowPeek.|.wp = ni|
|00002910| 6c 3b 0d 09 73 68 6f 72 | 74 09 09 09 09 09 6b 69 |l;..shor|t.....ki|
|00002920| 6e 64 20 3d 20 30 3b 0d | 09 42 6f 6f 6c 65 61 6e |nd = 0;.|.Boolean|
|00002930| 09 09 09 09 09 44 41 20 | 3d 20 66 61 6c 73 65 3b |.....DA |= false;|
|00002940| 0d 09 43 6f 6d 70 6f 6e | 65 6e 74 52 65 73 75 6c |..Compon|entResul|
|00002950| 74 09 09 09 72 65 73 75 | 6c 74 20 3d 20 6e 6f 45 |t...resu|lt = noE|
|00002960| 72 72 3b 0d 09 0d 09 2f | 2f 20 57 68 61 74 20 6b |rr;..../|/ What k|
|00002970| 69 6e 64 20 6f 66 20 77 | 69 6e 64 6f 77 20 69 73 |ind of w|indow is|
|00002980| 20 66 72 6f 6e 74 6d 6f | 73 74 3f 0d 09 77 70 20 | frontmo|st?..wp |
|00002990| 3d 20 28 57 69 6e 64 6f | 77 50 65 65 6b 29 20 46 |= (Windo|wPeek) F|
|000029a0| 72 6f 6e 74 57 69 6e 64 | 6f 77 28 29 3b 0d 09 6b |rontWind|ow();..k|
|000029b0| 69 6e 64 20 3d 20 77 70 | 20 3f 20 77 70 2d 3e 77 |ind = wp| ? wp->w|
|000029c0| 69 6e 64 6f 77 4b 69 6e | 64 20 3a 20 30 3b 0d 09 |indowKin|d : 0;..|
|000029d0| 44 41 20 3d 20 6b 69 6e | 64 20 3c 20 30 3b 0d 09 |DA = kin|d < 0;..|
|000029e0| 0d 09 2f 2f 20 53 65 74 | 20 6f 75 72 20 6d 65 6e |..// Set| our men|
|000029f0| 75 20 69 74 65 6d 20 73 | 74 61 74 65 73 20 61 70 |u item s|tates ap|
|00002a00| 70 72 6f 70 72 69 61 74 | 65 6c 79 0d 09 0d 09 2f |propriat|ely..../|
|00002a10| 2f 20 41 70 70 6c 65 20 | 6d 65 6e 75 0d 09 45 6e |/ Apple |menu..En|
|00002a20| 61 62 6c 65 20 28 28 48 | 61 6e 64 6c 65 29 20 67 |able ((H|andle) g|
|00002a30| 41 70 70 6c 65 4d 65 6e | 75 2c 20 6b 41 62 6f 75 |AppleMen|u, kAbou|
|00002a40| 74 49 74 65 6d 2c 20 74 | 72 75 65 29 3b 09 0d 09 |tItem, t|rue);...|
|00002a50| 0d 09 2f 2f 20 46 69 6c | 65 20 6d 65 6e 75 0d 09 |..// Fil|e menu..|
|00002a60| 45 6e 61 62 6c 65 20 28 | 28 48 61 6e 64 6c 65 29 |Enable (|(Handle)|
|00002a70| 20 67 46 69 6c 65 4d 65 | 6e 75 2c 20 6b 50 61 67 | gFileMe|nu, kPag|
|00002a80| 65 53 65 74 75 70 49 74 | 65 6d 2c 20 74 72 75 65 |eSetupIt|em, true|
|00002a90| 29 3b 0d 09 45 6e 61 62 | 6c 65 20 28 28 48 61 6e |);..Enab|le ((Han|
|00002aa0| 64 6c 65 29 20 67 46 69 | 6c 65 4d 65 6e 75 2c 20 |dle) gFi|leMenu, |
|00002ab0| 6b 50 72 69 6e 74 49 74 | 65 6d 2c 20 28 67 56 69 |kPrintIt|em, (gVi|
|00002ac0| 64 65 6f 43 68 61 6e 6e | 65 6c 20 21 3d 20 30 4c |deoChann|el != 0L|
|00002ad0| 20 3f 20 74 72 75 65 20 | 3a 20 66 61 6c 73 65 29 | ? true |: false)|
|00002ae0| 29 3b 0d 09 45 6e 61 62 | 6c 65 20 28 28 48 61 6e |);..Enab|le ((Han|
|00002af0| 64 6c 65 29 20 67 46 69 | 6c 65 4d 65 6e 75 2c 20 |dle) gFi|leMenu, |
|00002b00| 6b 51 75 69 74 49 74 65 | 6d 2c 20 74 72 75 65 29 |kQuitIte|m, true)|
|00002b10| 3b 0d 0d 09 2f 2f 20 45 | 64 69 74 20 6d 65 6e 75 |;...// E|dit menu|
|00002b20| 0d 09 45 6e 61 62 6c 65 | 20 28 28 48 61 6e 64 6c |..Enable| ((Handl|
|00002b30| 65 29 20 67 45 64 69 74 | 4d 65 6e 75 2c 20 6b 55 |e) gEdit|Menu, kU|
|00002b40| 6e 64 6f 49 74 65 6d 2c | 20 44 41 29 3b 0d 09 45 |ndoItem,| DA);..E|
|00002b50| 6e 61 62 6c 65 20 28 28 | 48 61 6e 64 6c 65 29 20 |nable ((|Handle) |
|00002b60| 67 45 64 69 74 4d 65 6e | 75 2c 20 6b 43 75 74 49 |gEditMen|u, kCutI|
|00002b70| 74 65 6d 2c 20 44 41 20 | 7c 7c 20 28 67 56 69 64 |tem, DA ||| (gVid|
|00002b80| 65 6f 43 68 61 6e 6e 65 | 6c 20 21 3d 20 30 4c 29 |eoChanne|l != 0L)|
|00002b90| 29 3b 0d 09 45 6e 61 62 | 6c 65 20 28 28 48 61 6e |);..Enab|le ((Han|
|00002ba0| 64 6c 65 29 20 67 45 64 | 69 74 4d 65 6e 75 2c 20 |dle) gEd|itMenu, |
|00002bb0| 6b 43 6f 70 79 49 74 65 | 6d 2c 20 44 41 20 7c 7c |kCopyIte|m, DA |||
|00002bc0| 20 28 67 56 69 64 65 6f | 43 68 61 6e 6e 65 6c 20 | (gVideo|Channel |
|00002bd0| 21 3d 20 30 4c 29 29 3b | 0d 09 45 6e 61 62 6c 65 |!= 0L));|..Enable|
|00002be0| 20 28 28 48 61 6e 64 6c | 65 29 20 67 45 64 69 74 | ((Handl|e) gEdit|
|00002bf0| 4d 65 6e 75 2c 20 6b 50 | 61 73 74 65 49 74 65 6d |Menu, kP|asteItem|
|00002c00| 2c 20 44 41 29 3b 0d 09 | 45 6e 61 62 6c 65 20 28 |, DA);..|Enable (|
|00002c10| 28 48 61 6e 64 6c 65 29 | 20 67 45 64 69 74 4d 65 |(Handle)| gEditMe|
|00002c20| 6e 75 2c 20 6b 43 6c 65 | 61 72 49 74 65 6d 2c 20 |nu, kCle|arItem, |
|00002c30| 44 41 29 3b 0d 09 0d 09 | 2f 2f 20 4d 6f 6e 69 74 |DA);....|// Monit|
|00002c40| 6f 72 20 6d 65 6e 75 0d | 09 45 6e 61 62 6c 65 20 |or menu.|.Enable |
|00002c50| 28 28 48 61 6e 64 6c 65 | 29 20 67 4d 6f 6e 69 74 |((Handle|) gMonit|
|00002c60| 6f 72 4d 65 6e 75 2c 20 | 6b 56 69 64 65 6f 53 65 |orMenu, |kVideoSe|
|00002c70| 74 74 69 6e 67 73 49 74 | 65 6d 2c 20 28 67 56 69 |ttingsIt|em, (gVi|
|00002c80| 64 65 6f 43 68 61 6e 6e | 65 6c 20 21 3d 20 30 4c |deoChann|el != 0L|
|00002c90| 20 3f 20 74 72 75 65 20 | 3a 20 66 61 6c 73 65 29 | ? true |: false)|
|00002ca0| 29 3b 0d 09 45 6e 61 62 | 6c 65 20 28 28 48 61 6e |);..Enab|le ((Han|
|00002cb0| 64 6c 65 29 20 67 4d 6f | 6e 69 74 6f 72 4d 65 6e |dle) gMo|nitorMen|
|00002cc0| 75 2c 20 6b 53 6f 75 6e | 64 53 65 74 74 69 6e 67 |u, kSoun|dSetting|
|00002cd0| 73 49 74 65 6d 2c 20 28 | 67 53 6f 75 6e 64 43 68 |sItem, (|gSoundCh|
|00002ce0| 61 6e 6e 65 6c 20 21 3d | 20 30 4c 20 3f 20 74 72 |annel !=| 0L ? tr|
|00002cf0| 75 65 20 3a 20 66 61 6c | 73 65 29 29 3b 0d 09 45 |ue : fal|se));..E|
|00002d00| 6e 61 62 6c 65 20 28 28 | 48 61 6e 64 6c 65 29 20 |nable ((|Handle) |
|00002d10| 67 4d 6f 6e 69 74 6f 72 | 4d 65 6e 75 2c 20 6b 51 |gMonitor|Menu, kQ|
|00002d20| 75 61 72 74 65 72 53 69 | 7a 65 49 74 65 6d 2c 20 |uarterSi|zeItem, |
|00002d30| 28 67 56 69 64 65 6f 43 | 68 61 6e 6e 65 6c 20 21 |(gVideoC|hannel !|
|00002d40| 3d 20 30 4c 20 3f 20 74 | 72 75 65 20 3a 20 66 61 |= 0L ? t|rue : fa|
|00002d50| 6c 73 65 29 29 3b 0d 09 | 43 68 65 63 6b 49 74 65 |lse));..|CheckIte|
|00002d60| 6d 20 28 67 4d 6f 6e 69 | 74 6f 72 4d 65 6e 75 2c |m (gMoni|torMenu,|
|00002d70| 20 6b 51 75 61 72 74 65 | 72 53 69 7a 65 49 74 65 | kQuarte|rSizeIte|
|00002d80| 6d 2c 20 67 51 75 61 72 | 74 65 72 53 69 7a 65 29 |m, gQuar|terSize)|
|00002d90| 3b 0d 09 45 6e 61 62 6c | 65 20 28 28 48 61 6e 64 |;..Enabl|e ((Hand|
|00002da0| 6c 65 29 20 67 4d 6f 6e | 69 74 6f 72 4d 65 6e 75 |le) gMon|itorMenu|
|00002db0| 2c 20 6b 48 61 6c 66 53 | 69 7a 65 49 74 65 6d 2c |, kHalfS|izeItem,|
|00002dc0| 20 28 67 56 69 64 65 6f | 43 68 61 6e 6e 65 6c 20 | (gVideo|Channel |
|00002dd0| 21 3d 20 30 4c 20 3f 20 | 74 72 75 65 20 3a 20 66 |!= 0L ? |true : f|
|00002de0| 61 6c 73 65 29 29 3b 0d | 09 43 68 65 63 6b 49 74 |alse));.|.CheckIt|
|00002df0| 65 6d 20 28 67 4d 6f 6e | 69 74 6f 72 4d 65 6e 75 |em (gMon|itorMenu|
|00002e00| 2c 20 6b 48 61 6c 66 53 | 69 7a 65 49 74 65 6d 2c |, kHalfS|izeItem,|
|00002e10| 20 67 48 61 6c 66 53 69 | 7a 65 29 3b 0d 09 45 6e | gHalfSi|ze);..En|
|00002e20| 61 62 6c 65 20 28 28 48 | 61 6e 64 6c 65 29 20 67 |able ((H|andle) g|
|00002e30| 4d 6f 6e 69 74 6f 72 4d | 65 6e 75 2c 20 6b 46 75 |MonitorM|enu, kFu|
|00002e40| 6c 6c 53 69 7a 65 49 74 | 65 6d 2c 20 28 67 56 69 |llSizeIt|em, (gVi|
|00002e50| 64 65 6f 43 68 61 6e 6e | 65 6c 20 21 3d 20 30 4c |deoChann|el != 0L|
|00002e60| 20 3f 20 74 72 75 65 20 | 3a 20 66 61 6c 73 65 29 | ? true |: false)|
|00002e70| 29 3b 0d 09 43 68 65 63 | 6b 49 74 65 6d 20 28 67 |);..Chec|kItem (g|
|00002e80| 4d 6f 6e 69 74 6f 72 4d | 65 6e 75 2c 20 6b 46 75 |MonitorM|enu, kFu|
|00002e90| 6c 6c 53 69 7a 65 49 74 | 65 6d 2c 20 67 46 75 6c |llSizeIt|em, gFul|
|00002ea0| 6c 53 69 7a 65 29 3b 0d | 09 45 6e 61 62 6c 65 20 |lSize);.|.Enable |
|00002eb0| 28 28 48 61 6e 64 6c 65 | 29 20 67 4d 6f 6e 69 74 |((Handle|) gMonit|
|00002ec0| 6f 72 4d 65 6e 75 2c 20 | 6b 52 65 63 6f 72 64 49 |orMenu, |kRecordI|
|00002ed0| 74 65 6d 2c 20 28 67 56 | 69 64 65 6f 43 68 61 6e |tem, (gV|ideoChan|
|00002ee0| 6e 65 6c 20 21 3d 20 30 | 4c 20 3f 20 74 72 75 65 |nel != 0|L ? true|
|00002ef0| 20 3a 20 66 61 6c 73 65 | 29 29 3b 0d 09 0d 09 2f | : false|));..../|
|00002f00| 2f 20 44 72 61 77 20 69 | 74 0d 09 44 72 61 77 4d |/ Draw i|t..DrawM|
|00002f10| 65 6e 75 42 61 72 28 29 | 3b 0d 7d 0d 0d 2f 2f 2d |enuBar()|;.}..//-|
|00002f20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f60| 2d 2d 2d 2d 2d 2d 0d 0d | 73 74 61 74 69 63 20 76 |------..|static v|
|00002f70| 6f 69 64 0d 45 6e 61 62 | 6c 65 20 28 48 61 6e 64 |oid.Enab|le (Hand|
|00002f80| 6c 65 20 6d 65 6e 75 2c | 20 73 68 6f 72 74 20 69 |le menu,| short i|
|00002f90| 74 65 6d 2c 20 42 6f 6f | 6c 65 61 6e 20 6f 6b 29 |tem, Boo|lean ok)|
|00002fa0| 0d 7b 0d 09 2f 2f 20 55 | 74 69 6c 69 74 79 20 72 |.{..// U|tility r|
|00002fb0| 6f 75 74 69 6e 65 20 74 | 6f 20 65 6e 61 62 6c 65 |outine t|o enable|
|00002fc0| 20 61 6e 64 20 64 69 73 | 61 62 6c 65 20 6d 65 6e | and dis|able men|
|00002fd0| 75 20 69 74 65 6d 73 0d | 09 69 66 20 28 6f 6b 29 |u items.|.if (ok)|
|00002fe0| 0d 09 7b 0d 09 09 45 6e | 61 62 6c 65 49 74 65 6d |..{...En|ableItem|
|00002ff0| 20 28 28 4d 65 6e 75 48 | 61 6e 64 6c 65 29 20 6d | ((MenuH|andle) m|
|00003000| 65 6e 75 2c 20 69 74 65 | 6d 29 3b 0d 09 7d 0d 09 |enu, ite|m);..}..|
|00003010| 65 6c 73 65 0d 09 7b 0d | 09 09 44 69 73 61 62 6c |else..{.|..Disabl|
|00003020| 65 49 74 65 6d 20 28 28 | 4d 65 6e 75 48 61 6e 64 |eItem ((|MenuHand|
|00003030| 6c 65 29 20 6d 65 6e 75 | 2c 20 69 74 65 6d 29 3b |le) menu|, item);|
|00003040| 0d 09 7d 0d 7d 0d 0d 2f | 2f 2d 2d 2d 2d 2d 2d 2d |..}.}../|/-------|
|00003050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003070| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003080| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003090| 0d 0d 73 74 61 74 69 63 | 20 76 6f 69 64 0d 48 61 |..static| void.Ha|
|000030a0| 6e 64 6c 65 4d 65 6e 75 | 20 28 6c 6f 6e 67 20 74 |ndleMenu| (long t|
|000030b0| 68 65 4d 65 6e 75 29 0d | 7b 09 0d 09 6c 6f 6e 67 |heMenu).|{...long|
|000030c0| 09 09 09 6d 53 65 6c 65 | 63 74 3b 0d 09 73 68 6f |...mSele|ct;..sho|
|000030d0| 72 74 09 09 09 6d 65 6e | 75 49 44 3b 0d 09 73 68 |rt...men|uID;..sh|
|000030e0| 6f 72 74 09 09 09 6d 65 | 6e 75 49 74 65 6d 3b 0d |ort...me|nuItem;.|
|000030f0| 09 43 6f 6d 70 6f 6e 65 | 6e 74 52 65 73 75 6c 74 |.Compone|ntResult|
|00003100| 09 72 65 73 75 6c 74 20 | 3d 20 6e 6f 45 72 72 3b |.result |= noErr;|
|00003110| 09 0d 09 53 74 72 32 35 | 35 09 09 09 6d 65 6e 75 |...Str25|5...menu|
|00003120| 49 74 65 6d 53 74 72 3b | 0d 09 0d 09 2f 2f 20 44 |ItemStr;|....// D|
|00003130| 69 64 20 77 65 20 67 65 | 74 20 61 20 6d 65 6e 75 |id we ge|t a menu|
|00003140| 3f 0d 09 69 66 20 28 74 | 68 65 4d 65 6e 75 20 3d |?..if (t|heMenu =|
|00003150| 3d 20 30 4c 29 0d 09 7b | 0d 09 09 2f 2f 20 4e 6f |= 0L)..{|...// No|
|00003160| 70 65 2c 20 67 65 74 20 | 69 74 20 66 72 6f 6d 20 |pe, get |it from |
|00003170| 6d 65 6e 75 20 73 65 6c | 65 63 74 0d 09 09 6d 53 |menu sel|ect...mS|
|00003180| 65 6c 65 63 74 20 3d 20 | 4d 65 6e 75 53 65 6c 65 |elect = |MenuSele|
|00003190| 63 74 20 28 67 54 68 65 | 45 76 65 6e 74 2e 77 68 |ct (gThe|Event.wh|
|000031a0| 65 72 65 29 3b 0d 09 7d | 0d 09 65 6c 73 65 0d 09 |ere);..}|..else..|
|000031b0| 7b 0d 09 09 2f 2f 20 59 | 65 70 2c 20 75 73 65 20 |{...// Y|ep, use |
|000031c0| 69 74 0d 09 09 6d 53 65 | 6c 65 63 74 20 3d 20 74 |it...mSe|lect = t|
|000031d0| 68 65 4d 65 6e 75 3b 0d | 09 7d 0d 09 0d 09 2f 2f |heMenu;.|.}....//|
|000031e0| 20 44 65 63 6f 64 65 20 | 69 74 0d 09 6d 65 6e 75 | Decode |it..menu|
|000031f0| 49 44 20 3d 20 48 69 57 | 6f 72 64 20 28 6d 53 65 |ID = HiW|ord (mSe|
|00003200| 6c 65 63 74 29 3b 0d 09 | 6d 65 6e 75 49 74 65 6d |lect);..|menuItem|
|00003210| 20 3d 20 4c 6f 57 6f 72 | 64 20 28 6d 53 65 6c 65 | = LoWor|d (mSele|
|00003220| 63 74 29 3b 0d 09 0d 09 | 2f 2f 20 57 68 69 63 68 |ct);....|// Which|
|00003230| 20 6d 65 6e 75 20 69 73 | 20 69 74 3f 0d 09 73 77 | menu is| it?..sw|
|00003240| 69 74 63 68 20 28 6d 65 | 6e 75 49 44 29 0d 09 7b |itch (me|nuID)..{|
|00003250| 0d 09 09 63 61 73 65 20 | 6b 41 70 70 6c 65 49 44 |...case |kAppleID|
|00003260| 3a 0d 09 09 7b 0d 09 09 | 09 69 66 20 28 6d 65 6e |:...{...|.if (men|
|00003270| 75 49 74 65 6d 20 3d 3d | 20 6b 41 62 6f 75 74 49 |uItem ==| kAboutI|
|00003280| 74 65 6d 29 0d 09 09 09 | 7b 0d 09 09 09 09 2f 2f |tem)....|{.....//|
|00003290| 20 44 6f 20 74 68 65 20 | 62 6f 72 69 6e 67 20 61 | Do the |boring a|
|000032a0| 62 6f 75 74 20 62 6f 78 | 0d 09 09 09 09 44 6f 41 |bout box|.....DoA|
|000032b0| 62 6f 75 74 44 69 61 6c | 6f 67 28 29 3b 0d 09 09 |boutDial|og();...|
|000032c0| 09 7d 0d 09 09 09 65 6c | 73 65 09 2f 2f 20 49 74 |.}....el|se.// It|
|000032d0| 27 73 20 61 20 44 41 0d | 09 09 09 7b 0d 09 09 09 |'s a DA.|...{....|
|000032e0| 09 53 74 72 32 35 35 09 | 6e 61 6d 65 3b 0d 09 09 |.Str255.|name;...|
|000032f0| 09 09 47 72 61 66 50 74 | 72 09 73 61 76 65 64 50 |..GrafPt|r.savedP|
|00003300| 6f 72 74 3b 0d 09 09 09 | 09 0d 09 09 09 09 2f 2f |ort;....|......//|
|00003310| 20 4f 70 65 6e 20 74 68 | 65 20 44 41 0d 09 09 09 | Open th|e DA....|
|00003320| 09 47 65 74 50 6f 72 74 | 20 28 26 73 61 76 65 64 |.GetPort| (&saved|
|00003330| 50 6f 72 74 29 3b 0d 09 | 09 09 09 47 65 74 49 74 |Port);..|...GetIt|
|00003340| 65 6d 20 28 67 41 70 70 | 6c 65 4d 65 6e 75 2c 20 |em (gApp|leMenu, |
|00003350| 6d 65 6e 75 49 74 65 6d | 2c 20 6e 61 6d 65 29 3b |menuItem|, name);|
|00003360| 0d 09 09 09 09 4f 70 65 | 6e 44 65 73 6b 41 63 63 |.....Ope|nDeskAcc|
|00003370| 20 28 6e 61 6d 65 29 3b | 0d 09 09 09 09 53 65 74 | (name);|.....Set|
|00003380| 50 6f 72 74 20 28 73 61 | 76 65 64 50 6f 72 74 29 |Port (sa|vedPort)|
|00003390| 3b 0d 09 09 09 7d 0d 09 | 09 09 62 72 65 61 6b 3b |;....}..|..break;|
|000033a0| 0d 09 09 7d 0d 09 09 63 | 61 73 65 20 6b 46 69 6c |...}...c|ase kFil|
|000033b0| 65 49 44 3a 0d 09 09 7b | 0d 09 09 09 73 77 69 74 |eID:...{|....swit|
|000033c0| 63 68 20 28 6d 65 6e 75 | 49 74 65 6d 29 0d 09 09 |ch (menu|Item)...|
|000033d0| 09 7b 0d 09 09 09 09 63 | 61 73 65 20 6b 50 61 67 |.{.....c|ase kPag|
|000033e0| 65 53 65 74 75 70 49 74 | 65 6d 3a 0d 09 09 09 09 |eSetupIt|em:.....|
|000033f0| 7b 0d 09 09 09 09 09 2f | 2f 20 44 6f 20 74 68 65 |{....../|/ Do the|
|00003400| 20 70 61 67 65 20 73 65 | 74 75 70 20 64 69 61 6c | page se|tup dial|
|00003410| 6f 67 0d 09 09 09 09 09 | 50 72 4f 70 65 6e 28 29 |og......|PrOpen()|
|00003420| 3b 0d 09 09 09 09 09 50 | 72 53 74 6c 44 69 61 6c |;......P|rStlDial|
|00003430| 6f 67 20 28 67 50 72 69 | 6e 74 52 65 63 29 3b 0d |og (gPri|ntRec);.|
|00003440| 09 09 09 09 09 50 72 43 | 6c 6f 73 65 28 29 3b 0d |.....PrC|lose();.|
|00003450| 09 09 09 09 09 62 72 65 | 61 6b 3b 0d 09 09 09 09 |.....bre|ak;.....|
|00003460| 7d 0d 09 09 09 09 63 61 | 73 65 20 6b 50 72 69 6e |}.....ca|se kPrin|
|00003470| 74 49 74 65 6d 3a 0d 09 | 09 09 09 7b 0d 09 09 09 |tItem:..|...{....|
|00003480| 09 09 54 50 50 72 50 6f | 72 74 09 70 72 69 6e 74 |..TPPrPo|rt.print|
|00003490| 50 6f 72 74 3b 0d 09 09 | 09 09 09 54 50 72 53 74 |Port;...|...TPrSt|
|000034a0| 61 74 75 73 09 70 72 69 | 6e 74 53 74 61 74 75 73 |atus.pri|ntStatus|
|000034b0| 3b 0d 09 09 09 09 09 0d | 09 09 09 09 09 2f 2f 20 |;.......|.....// |
|000034c0| 43 6f 70 79 20 61 20 66 | 72 61 6d 65 20 66 72 6f |Copy a f|rame fro|
|000034d0| 6d 20 74 68 65 20 6d 6f | 6e 69 74 6f 72 0d 09 09 |m the mo|nitor...|
|000034e0| 09 09 09 69 66 20 28 67 | 4d 6f 6e 69 74 6f 72 50 |...if (g|MonitorP|
|000034f0| 49 43 54 20 21 3d 20 6e | 69 6c 29 0d 09 09 09 09 |ICT != n|il).....|
|00003500| 09 7b 0d 09 09 09 09 09 | 09 4b 69 6c 6c 50 69 63 |.{......|.KillPic|
|00003510| 74 75 72 65 20 28 67 4d | 6f 6e 69 74 6f 72 50 49 |ture (gM|onitorPI|
|00003520| 43 54 29 3b 0d 09 09 09 | 09 09 7d 0d 09 09 09 09 |CT);....|..}.....|
|00003530| 09 67 4d 6f 6e 69 74 6f | 72 50 49 43 54 20 3d 20 |.gMonito|rPICT = |
|00003540| 6e 69 6c 3b 0d 09 09 09 | 09 09 72 65 73 75 6c 74 |nil;....|..result|
|00003550| 20 3d 20 53 47 47 72 61 | 62 50 69 63 74 20 28 67 | = SGGra|bPict (g|
|00003560| 53 65 71 47 72 61 62 62 | 65 72 2c 20 26 67 4d 6f |SeqGrabb|er, &gMo|
|00003570| 6e 69 74 6f 72 50 49 43 | 54 2c 20 6e 69 6c 2c 20 |nitorPIC|T, nil, |
|00003580| 30 2c 20 67 72 61 62 50 | 69 63 74 4f 66 66 53 63 |0, grabP|ictOffSc|
|00003590| 72 65 65 6e 29 3b 0d 09 | 09 09 09 09 69 66 20 28 |reen);..|....if (|
|000035a0| 28 72 65 73 75 6c 74 20 | 3d 3d 20 6e 6f 45 72 72 |(result |== noErr|
|000035b0| 29 20 26 26 20 28 67 4d | 6f 6e 69 74 6f 72 50 49 |) && (gM|onitorPI|
|000035c0| 43 54 20 21 3d 20 6e 69 | 6c 29 29 0d 09 09 09 09 |CT != ni|l)).....|
|000035d0| 09 7b 0d 09 09 09 09 09 | 09 2f 2f 20 50 72 69 6e |.{......|.// Prin|
|000035e0| 74 20 69 74 0d 09 09 09 | 09 09 09 48 4c 6f 63 6b |t it....|...HLock|
|000035f0| 20 28 28 48 61 6e 64 6c | 65 29 20 67 4d 6f 6e 69 | ((Handl|e) gMoni|
|00003600| 74 6f 72 50 49 43 54 29 | 3b 0d 09 09 09 09 09 09 |torPICT)|;.......|
|00003610| 50 72 4f 70 65 6e 28 29 | 3b 0d 09 09 09 09 09 09 |PrOpen()|;.......|
|00003620| 69 66 20 28 50 72 4a 6f | 62 44 69 61 6c 6f 67 20 |if (PrJo|bDialog |
|00003630| 28 67 50 72 69 6e 74 52 | 65 63 29 29 0d 09 09 09 |(gPrintR|ec))....|
|00003640| 09 09 09 7b 0d 09 09 09 | 09 09 09 09 70 72 69 6e |...{....|....prin|
|00003650| 74 50 6f 72 74 20 3d 20 | 50 72 4f 70 65 6e 44 6f |tPort = |PrOpenDo|
|00003660| 63 20 28 67 50 72 69 6e | 74 52 65 63 2c 20 6e 69 |c (gPrin|tRec, ni|
|00003670| 6c 2c 20 6e 69 6c 29 3b | 0d 09 09 09 09 09 09 09 |l, nil);|........|
|00003680| 72 65 73 75 6c 74 20 3d | 20 50 72 45 72 72 6f 72 |result =| PrError|
|00003690| 28 29 3b 0d 09 09 09 09 | 09 09 09 50 72 4f 70 65 |();.....|...PrOpe|
|000036a0| 6e 50 61 67 65 20 28 70 | 72 69 6e 74 50 6f 72 74 |nPage (p|rintPort|
|000036b0| 2c 20 30 29 3b 0d 09 09 | 09 09 09 09 09 72 65 73 |, 0);...|.....res|
|000036c0| 75 6c 74 20 3d 20 50 72 | 45 72 72 6f 72 28 29 3b |ult = Pr|Error();|
|000036d0| 0d 09 09 09 09 09 09 09 | 44 72 61 77 50 69 63 74 |........|DrawPict|
|000036e0| 75 72 65 20 28 67 4d 6f | 6e 69 74 6f 72 50 49 43 |ure (gMo|nitorPIC|
|000036f0| 54 2c 20 26 28 28 2a 2a | 67 4d 6f 6e 69 74 6f 72 |T, &((**|gMonitor|
|00003700| 50 49 43 54 29 2e 70 69 | 63 46 72 61 6d 65 29 29 |PICT).pi|cFrame))|
|00003710| 3b 0d 09 09 09 09 09 09 | 09 50 72 43 6c 6f 73 65 |;.......|.PrClose|
|00003720| 50 61 67 65 20 28 70 72 | 69 6e 74 50 6f 72 74 29 |Page (pr|intPort)|
|00003730| 3b 0d 09 09 09 09 09 09 | 09 72 65 73 75 6c 74 20 |;.......|.result |
|00003740| 3d 20 50 72 45 72 72 6f | 72 28 29 3b 0d 09 09 09 |= PrErro|r();....|
|00003750| 09 09 09 09 50 72 43 6c | 6f 73 65 44 6f 63 20 28 |....PrCl|oseDoc (|
|00003760| 70 72 69 6e 74 50 6f 72 | 74 29 3b 0d 09 09 09 09 |printPor|t);.....|
|00003770| 09 09 09 72 65 73 75 6c | 74 20 3d 20 50 72 45 72 |...resul|t = PrEr|
|00003780| 72 6f 72 28 29 3b 0d 09 | 09 09 09 09 09 09 69 66 |ror();..|......if|
|00003790| 20 28 28 2a 2a 67 50 72 | 69 6e 74 52 65 63 29 2e | ((**gPr|intRec).|
|000037a0| 70 72 4a 6f 62 2e 62 4a | 44 6f 63 4c 6f 6f 70 20 |prJob.bJ|DocLoop |
|000037b0| 3d 3d 20 62 53 70 6f 6f | 6c 4c 6f 6f 70 29 0d 09 |== bSpoo|lLoop)..|
|000037c0| 09 09 09 09 09 09 7b 0d | 09 09 09 09 09 09 09 09 |......{.|........|
|000037d0| 50 72 50 69 63 46 69 6c | 65 20 28 67 50 72 69 6e |PrPicFil|e (gPrin|
|000037e0| 74 52 65 63 2c 20 30 2c | 20 30 2c 20 30 2c 20 26 |tRec, 0,| 0, 0, &|
|000037f0| 70 72 69 6e 74 53 74 61 | 74 75 73 29 3b 0d 09 09 |printSta|tus);...|
|00003800| 09 09 09 09 09 09 72 65 | 73 75 6c 74 20 3d 20 50 |......re|sult = P|
|00003810| 72 45 72 72 6f 72 28 29 | 3b 0d 09 09 09 09 09 09 |rError()|;.......|
|00003820| 09 7d 0d 09 09 09 09 09 | 09 7d 0d 09 09 09 09 09 |.}......|.}......|
|00003830| 09 50 72 43 6c 6f 73 65 | 28 29 3b 0d 09 09 09 09 |.PrClose|();.....|
|00003840| 09 09 72 65 73 75 6c 74 | 20 3d 20 50 72 45 72 72 |..result| = PrErr|
|00003850| 6f 72 28 29 3b 0d 09 09 | 09 09 09 09 48 55 6e 6c |or();...|....HUnl|
|00003860| 6f 63 6b 20 28 28 48 61 | 6e 64 6c 65 29 20 67 4d |ock ((Ha|ndle) gM|
|00003870| 6f 6e 69 74 6f 72 50 49 | 43 54 29 3b 0d 09 09 09 |onitorPI|CT);....|
|00003880| 09 09 7d 0d 09 09 09 09 | 09 62 72 65 61 6b 3b 0d |..}.....|.break;.|
|00003890| 09 09 09 09 7d 0d 09 09 | 09 09 63 61 73 65 20 6b |....}...|..case k|
|000038a0| 51 75 69 74 49 74 65 6d | 3a 0d 09 09 09 09 7b 0d |QuitItem|:.....{.|
|000038b0| 09 09 09 09 09 2f 2f 20 | 4c 65 74 27 73 20 73 63 |.....// |Let's sc|
|000038c0| 72 61 6d 0d 09 09 09 09 | 09 44 6f 51 75 69 74 28 |ram.....|.DoQuit(|
|000038d0| 29 3b 0d 09 09 09 09 09 | 62 72 65 61 6b 3b 0d 09 |);......|break;..|
|000038e0| 09 09 09 7d 0d 09 09 09 | 7d 0d 09 09 09 62 72 65 |...}....|}....bre|
|000038f0| 61 6b 3b 0d 09 09 7d 0d | 09 09 63 61 73 65 20 6b |ak;...}.|..case k|
|00003900| 45 64 69 74 49 44 3a 0d | 09 09 7b 0d 09 09 09 2f |EditID:.|..{..../|
|00003910| 2f 20 49 73 20 74 68 69 | 73 20 61 20 44 41 20 6b |/ Is thi|s a DA k|
|00003920| 69 6e 64 20 6f 66 20 74 | 68 69 6e 67 3f 0d 09 09 |ind of t|hing?...|
|00003930| 09 69 66 20 28 21 53 79 | 73 74 65 6d 45 64 69 74 |.if (!Sy|stemEdit|
|00003940| 20 28 6d 65 6e 75 49 74 | 65 6d 20 2d 20 31 29 29 | (menuIt|em - 1))|
|00003950| 0d 09 09 09 7b 0d 09 09 | 09 09 2f 2f 20 57 65 20 |....{...|..// We |
|00003960| 6f 6e 6c 79 20 64 6f 20 | 63 75 74 20 61 6e 64 20 |only do |cut and |
|00003970| 63 6f 70 79 0d 09 09 09 | 09 69 66 20 28 28 6d 65 |copy....|.if ((me|
|00003980| 6e 75 49 74 65 6d 20 3d | 3d 20 6b 43 75 74 49 74 |nuItem =|= kCutIt|
|00003990| 65 6d 29 20 7c 7c 20 28 | 6d 65 6e 75 49 74 65 6d |em) || (|menuItem|
|000039a0| 20 3d 3d 20 6b 43 6f 70 | 79 49 74 65 6d 29 29 0d | == kCop|yItem)).|
|000039b0| 09 09 09 09 7b 0d 09 09 | 09 09 09 2f 2f 20 43 6f |....{...|...// Co|
|000039c0| 70 79 20 61 20 66 72 61 | 6d 65 20 66 72 6f 6d 20 |py a fra|me from |
|000039d0| 74 68 65 20 6d 6f 6e 69 | 74 6f 72 0d 09 09 09 09 |the moni|tor.....|
|000039e0| 09 69 66 20 28 67 4d 6f | 6e 69 74 6f 72 50 49 43 |.if (gMo|nitorPIC|
|000039f0| 54 20 21 3d 20 6e 69 6c | 29 0d 09 09 09 09 09 7b |T != nil|)......{|
|00003a00| 0d 09 09 09 09 09 09 4b | 69 6c 6c 50 69 63 74 75 |.......K|illPictu|
|00003a10| 72 65 20 28 67 4d 6f 6e | 69 74 6f 72 50 49 43 54 |re (gMon|itorPICT|
|00003a20| 29 3b 0d 09 09 09 09 09 | 7d 0d 09 09 09 09 09 67 |);......|}......g|
|00003a30| 4d 6f 6e 69 74 6f 72 50 | 49 43 54 20 3d 20 6e 69 |MonitorP|ICT = ni|
|00003a40| 6c 3b 0d 09 09 09 09 09 | 72 65 73 75 6c 74 20 3d |l;......|result =|
|00003a50| 20 53 47 47 72 61 62 50 | 69 63 74 20 28 67 53 65 | SGGrabP|ict (gSe|
|00003a60| 71 47 72 61 62 62 65 72 | 2c 20 26 67 4d 6f 6e 69 |qGrabber|, &gMoni|
|00003a70| 74 6f 72 50 49 43 54 2c | 20 6e 69 6c 2c 20 30 2c |torPICT,| nil, 0,|
|00003a80| 20 67 72 61 62 50 69 63 | 74 4f 66 66 53 63 72 65 | grabPic|tOffScre|
|00003a90| 65 6e 29 3b 0d 09 09 09 | 09 09 69 66 20 28 28 72 |en);....|..if ((r|
|00003aa0| 65 73 75 6c 74 20 3d 3d | 20 6e 6f 45 72 72 29 20 |esult ==| noErr) |
|00003ab0| 26 26 20 28 67 4d 6f 6e | 69 74 6f 72 50 49 43 54 |&& (gMon|itorPICT|
|00003ac0| 20 21 3d 20 6e 69 6c 29 | 29 0d 09 09 09 09 09 7b | != nil)|)......{|
|00003ad0| 0d 09 09 09 09 09 09 72 | 65 73 75 6c 74 20 3d 20 |.......r|esult = |
|00003ae0| 5a 65 72 6f 53 63 72 61 | 70 28 29 3b 0d 09 09 09 |ZeroScra|p();....|
|00003af0| 09 09 09 48 4c 6f 63 6b | 20 28 28 48 61 6e 64 6c |...HLock| ((Handl|
|00003b00| 65 29 20 67 4d 6f 6e 69 | 74 6f 72 50 49 43 54 29 |e) gMoni|torPICT)|
|00003b10| 3b 0d 09 09 09 09 09 09 | 72 65 73 75 6c 74 20 3d |;.......|result =|
|00003b20| 20 50 75 74 53 63 72 61 | 70 20 28 47 65 74 48 61 | PutScra|p (GetHa|
|00003b30| 6e 64 6c 65 53 69 7a 65 | 20 28 28 48 61 6e 64 6c |ndleSize| ((Handl|
|00003b40| 65 29 20 67 4d 6f 6e 69 | 74 6f 72 50 49 43 54 29 |e) gMoni|torPICT)|
|00003b50| 2c 20 27 50 49 43 54 27 | 2c 20 2a 28 48 61 6e 64 |, 'PICT'|, *(Hand|
|00003b60| 6c 65 29 67 4d 6f 6e 69 | 74 6f 72 50 49 43 54 29 |le)gMoni|torPICT)|
|00003b70| 3b 0d 09 09 09 09 09 09 | 48 55 6e 6c 6f 63 6b 20 |;.......|HUnlock |
|00003b80| 28 28 48 61 6e 64 6c 65 | 29 20 67 4d 6f 6e 69 74 |((Handle|) gMonit|
|00003b90| 6f 72 50 49 43 54 29 3b | 0d 09 09 09 09 09 09 69 |orPICT);|.......i|
|00003ba0| 66 20 28 72 65 73 75 6c | 74 20 21 3d 20 6e 6f 45 |f (resul|t != noE|
|00003bb0| 72 72 29 0d 09 09 09 09 | 09 09 7b 0d 09 09 09 09 |rr).....|..{.....|
|00003bc0| 09 09 09 2f 2f 20 43 75 | 74 20 6f 72 20 63 6f 70 |...// Cu|t or cop|
|00003bd0| 79 20 66 61 69 6c 65 64 | 2c 20 70 72 6f 62 61 62 |y failed|, probab|
|00003be0| 6c 79 20 64 75 65 20 74 | 6f 20 6c 61 63 6b 20 6f |ly due t|o lack o|
|00003bf0| 66 20 6d 65 6d 6f 72 79 | 0d 09 09 09 09 09 09 7d |f memory|.......}|
|00003c00| 0d 09 09 09 09 09 7d 0d | 09 09 09 09 7d 0d 09 09 |......}.|....}...|
|00003c10| 09 7d 0d 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 7d |.}....br|eak;...}|
|00003c20| 0d 09 09 63 61 73 65 20 | 6b 4d 6f 6e 69 74 6f 72 |...case |kMonitor|
|00003c30| 49 44 3a 0d 09 09 7b 0d | 09 09 09 73 77 69 74 63 |ID:...{.|...switc|
|00003c40| 68 20 28 6d 65 6e 75 49 | 74 65 6d 29 0d 09 09 09 |h (menuI|tem)....|
|00003c50| 7b 0d 09 09 09 09 73 68 | 6f 72 74 09 09 77 69 64 |{.....sh|ort..wid|
|00003c60| 74 68 3b 0d 09 09 09 09 | 73 68 6f 72 74 09 09 68 |th;.....|short..h|
|00003c70| 65 69 67 68 74 3b 0d 09 | 09 09 09 52 65 63 74 09 |eight;..|...Rect.|
|00003c80| 09 63 75 72 42 6f 75 6e | 64 73 3b 0d 09 09 09 09 |.curBoun|ds;.....|
|00003c90| 52 65 63 74 09 09 63 75 | 72 56 69 64 65 6f 52 65 |Rect..cu|rVideoRe|
|00003ca0| 63 74 3b 0d 09 09 09 09 | 52 65 63 74 09 09 6e 65 |ct;.....|Rect..ne|
|00003cb0| 77 56 69 64 65 6f 52 65 | 63 74 3b 0d 09 09 09 09 |wVideoRe|ct;.....|
|00003cc0| 52 65 63 74 09 09 6e 65 | 77 42 6f 75 6e 64 73 3b |Rect..ne|wBounds;|
|00003cd0| 0d 09 09 09 09 52 65 63 | 74 09 09 6d 61 78 42 6f |.....Rec|t..maxBo|
|00003ce0| 75 6e 64 73 52 65 63 74 | 3b 0d 09 09 09 09 47 72 |undsRect|;.....Gr|
|00003cf0| 61 66 50 74 72 09 09 73 | 61 76 65 64 50 6f 72 74 |afPtr..s|avedPort|
|00003d00| 3b 0d 09 09 09 09 52 67 | 6e 48 61 6e 64 6c 65 09 |;.....Rg|nHandle.|
|00003d10| 64 65 61 64 52 67 6e 3b | 0d 09 09 09 09 52 65 63 |deadRgn;|.....Rec|
|00003d20| 74 09 09 62 6f 75 6e 64 | 73 52 65 63 74 3b 0d 09 |t..bound|sRect;..|
|00003d30| 09 09 09 09 0d 09 09 09 | 09 63 61 73 65 20 6b 56 |........|.case kV|
|00003d40| 69 64 65 6f 53 65 74 74 | 69 6e 67 73 49 74 65 6d |ideoSett|ingsItem|
|00003d50| 3a 0d 09 09 09 09 7b 0d | 09 09 09 09 09 69 66 20 |:.....{.|.....if |
|00003d60| 28 28 67 53 65 71 47 72 | 61 62 62 65 72 20 21 3d |((gSeqGr|abber !=|
|00003d70| 20 30 4c 29 20 26 26 20 | 28 67 56 69 64 65 6f 43 | 0L) && |(gVideoC|
|00003d80| 68 61 6e 6e 65 6c 20 21 | 3d 20 30 4c 29 29 0d 09 |hannel !|= 0L))..|
|00003d90| 09 09 09 09 7b 0d 09 09 | 09 09 09 09 52 65 63 74 |....{...|....Rect|
|00003da0| 09 6e 65 77 41 63 74 69 | 76 65 56 69 64 65 6f 52 |.newActi|veVideoR|
|00003db0| 65 63 74 3b 0d 09 09 09 | 09 09 09 52 65 63 74 09 |ect;....|...Rect.|
|00003dc0| 61 64 6a 75 73 74 65 64 | 41 63 74 69 76 65 56 69 |adjusted|ActiveVi|
|00003dd0| 64 65 6f 52 65 63 74 3b | 0d 09 09 09 09 09 09 0d |deoRect;|........|
|00003de0| 09 09 09 09 09 09 2f 2f | 20 47 65 74 20 6f 75 72 |......//| Get our|
|00003df0| 20 63 75 72 72 65 6e 74 | 20 73 74 61 74 65 0d 09 | current| state..|
|00003e00| 09 09 09 09 09 72 65 73 | 75 6c 74 20 3d 20 53 47 |.....res|ult = SG|
|00003e10| 47 65 74 43 68 61 6e 6e | 65 6c 42 6f 75 6e 64 73 |GetChann|elBounds|
|00003e20| 20 28 67 56 69 64 65 6f | 43 68 61 6e 6e 65 6c 2c | (gVideo|Channel,|
|00003e30| 20 26 63 75 72 42 6f 75 | 6e 64 73 29 3b 0d 09 09 | &curBou|nds);...|
|00003e40| 09 09 09 09 72 65 73 75 | 6c 74 20 3d 20 53 47 47 |....resu|lt = SGG|
|00003e50| 65 74 56 69 64 65 6f 52 | 65 63 74 20 28 67 56 69 |etVideoR|ect (gVi|
|00003e60| 64 65 6f 43 68 61 6e 6e | 65 6c 2c 20 26 63 75 72 |deoChann|el, &cur|
|00003e70| 56 69 64 65 6f 52 65 63 | 74 29 3b 0d 09 09 09 09 |VideoRec|t);.....|
|00003e80| 09 09 0d 09 09 09 09 09 | 09 2f 2f 20 50 61 75 73 |........|.// Paus|
|00003e90| 65 0d 09 09 09 09 09 09 | 72 65 73 75 6c 74 20 3d |e.......|result =|
|00003ea0| 20 53 47 50 61 75 73 65 | 20 28 67 53 65 71 47 72 | SGPause| (gSeqGr|
|00003eb0| 61 62 62 65 72 2c 20 74 | 72 75 65 29 3b 0d 09 09 |abber, t|rue);...|
|00003ec0| 09 09 09 09 0d 09 09 09 | 09 09 09 2f 2f 20 44 6f |........|...// Do|
|00003ed0| 20 74 68 65 20 64 69 61 | 6c 6f 67 20 74 68 61 6e | the dia|log than|
|00003ee0| 67 0d 09 09 09 09 09 09 | 72 65 73 75 6c 74 20 3d |g.......|result =|
|00003ef0| 20 53 47 53 65 74 74 69 | 6e 67 73 44 69 61 6c 6f | SGSetti|ngsDialo|
|00003f00| 67 20 28 67 53 65 71 47 | 72 61 62 62 65 72 2c 20 |g (gSeqG|rabber, |
|00003f10| 67 56 69 64 65 6f 43 68 | 61 6e 6e 65 6c 2c 20 30 |gVideoCh|annel, 0|
|00003f20| 2c 20 0d 09 09 09 09 09 | 09 09 6e 69 6c 2c 20 30 |, ......|..nil, 0|
|00003f30| 4c 2c 20 53 65 71 47 72 | 61 62 62 65 72 4d 6f 64 |L, SeqGr|abberMod|
|00003f40| 61 6c 46 69 6c 74 65 72 | 50 72 6f 63 2c 20 28 6c |alFilter|Proc, (l|
|00003f50| 6f 6e 67 29 20 53 74 72 | 69 70 41 64 64 72 65 73 |ong) Str|ipAddres|
|00003f60| 73 20 28 28 50 74 72 29 | 20 67 4d 6f 6e 69 74 6f |s ((Ptr)| gMonito|
|00003f70| 72 29 29 3b 0d 09 09 09 | 09 09 09 09 0d 09 09 09 |r));....|........|
|00003f80| 09 09 09 2f 2f 20 57 68 | 61 74 20 68 61 70 70 65 |...// Wh|at happe|
|00003f90| 6e 65 64 3f 0d 09 09 09 | 09 09 09 72 65 73 75 6c |ned?....|...resul|
|00003fa0| 74 20 3d 20 53 47 47 65 | 74 56 69 64 65 6f 52 65 |t = SGGe|tVideoRe|
|00003fb0| 63 74 20 28 67 56 69 64 | 65 6f 43 68 61 6e 6e 65 |ct (gVid|eoChanne|
|00003fc0| 6c 2c 20 26 6e 65 77 56 | 69 64 65 6f 52 65 63 74 |l, &newV|ideoRect|
|00003fd0| 29 3b 0d 09 09 09 09 09 | 09 72 65 73 75 6c 74 20 |);......|.result |
|00003fe0| 3d 20 53 47 47 65 74 53 | 72 63 56 69 64 65 6f 42 |= SGGetS|rcVideoB|
|00003ff0| 6f 75 6e 64 73 20 28 67 | 56 69 64 65 6f 43 68 61 |ounds (g|VideoCha|
|00004000| 6e 6e 65 6c 2c 20 26 6e | 65 77 41 63 74 69 76 65 |nnel, &n|ewActive|
|00004010| 56 69 64 65 6f 52 65 63 | 74 29 3b 0d 0d 09 09 09 |VideoRec|t);.....|
|00004020| 09 09 09 2f 2f 20 53 65 | 74 20 75 70 20 6f 75 72 |...// Se|t up our|
|00004030| 20 70 6f 72 74 0d 09 09 | 09 09 09 09 47 65 74 50 | port...|....GetP|
|00004040| 6f 72 74 20 28 26 73 61 | 76 65 64 50 6f 72 74 29 |ort (&sa|vedPort)|
|00004050| 3b 0d 09 09 09 09 09 09 | 53 65 74 50 6f 72 74 20 |;.......|SetPort |
|00004060| 28 67 4d 6f 6e 69 74 6f | 72 29 3b 0d 09 09 09 09 |(gMonito|r);.....|
|00004070| 09 09 0d 09 09 09 09 09 | 09 2f 2f 20 48 61 73 20 |........|.// Has |
|00004080| 6f 75 72 20 61 63 74 69 | 76 65 20 72 65 63 74 20 |our acti|ve rect |
|00004090| 63 68 61 6e 67 65 64 3f | 0d 09 09 09 09 09 09 2f |changed?|......./|
|000040a0| 2f 20 49 66 20 73 6f 2c | 20 69 74 27 73 20 62 65 |/ If so,| it's be|
|000040b0| 63 61 75 73 65 20 6f 75 | 72 20 76 69 64 65 6f 20 |cause ou|r video |
|000040c0| 73 74 61 6e 64 61 72 64 | 20 63 68 61 6e 67 65 64 |standard| changed|
|000040d0| 20 28 65 2e 67 2e 2c 20 | 4e 54 53 43 20 74 6f 20 | (e.g., |NTSC to |
|000040e0| 50 41 4c 29 2c 0d 09 09 | 09 09 09 09 2f 2f 20 61 |PAL),...|....// a|
|000040f0| 6e 64 20 77 65 20 6e 65 | 65 64 20 74 6f 20 61 64 |nd we ne|ed to ad|
|00004100| 6a 75 73 74 20 6f 75 72 | 20 6d 6f 6e 69 74 6f 72 |just our| monitor|
|00004110| 20 77 69 6e 64 6f 77 0d | 09 09 09 09 09 09 69 66 | window.|......if|
|00004120| 20 28 21 45 71 75 61 6c | 52 65 63 74 20 28 26 67 | (!Equal|Rect (&g|
|00004130| 41 63 74 69 76 65 56 69 | 64 65 6f 52 65 63 74 2c |ActiveVi|deoRect,|
|00004140| 20 26 6e 65 77 41 63 74 | 69 76 65 56 69 64 65 6f | &newAct|iveVideo|
|00004150| 52 65 63 74 29 29 0d 09 | 09 09 09 09 09 7b 0d 09 |Rect))..|.....{..|
|00004160| 09 09 09 09 09 09 69 66 | 20 28 67 46 75 6c 6c 53 |......if| (gFullS|
|00004170| 69 7a 65 29 0d 09 09 09 | 09 09 09 09 7b 0d 09 09 |ize)....|....{...|
|00004180| 09 09 09 09 09 09 77 69 | 64 74 68 20 3d 20 6e 65 |......wi|dth = ne|
|00004190| 77 41 63 74 69 76 65 56 | 69 64 65 6f 52 65 63 74 |wActiveV|ideoRect|
|000041a0| 2e 72 69 67 68 74 20 2d | 20 6e 65 77 41 63 74 69 |.right -| newActi|
|000041b0| 76 65 56 69 64 65 6f 52 | 65 63 74 2e 6c 65 66 74 |veVideoR|ect.left|
|000041c0| 3b 0d 09 09 09 09 09 09 | 09 09 68 65 69 67 68 74 |;.......|..height|
|000041d0| 20 3d 20 6e 65 77 41 63 | 74 69 76 65 56 69 64 65 | = newAc|tiveVide|
|000041e0| 6f 52 65 63 74 2e 62 6f | 74 74 6f 6d 20 2d 20 6e |oRect.bo|ttom - n|
|000041f0| 65 77 41 63 74 69 76 65 | 56 69 64 65 6f 52 65 63 |ewActive|VideoRec|
|00004200| 74 2e 74 6f 70 3b 0d 09 | 09 09 09 09 09 09 09 0d |t.top;..|........|
|00004210| 09 09 09 09 09 09 09 09 | 67 41 63 74 69 76 65 56 |........|gActiveV|
|00004220| 69 64 65 6f 52 65 63 74 | 20 3d 20 6e 65 77 41 63 |ideoRect| = newAc|
|00004230| 74 69 76 65 56 69 64 65 | 6f 52 65 63 74 3b 0d 09 |tiveVide|oRect;..|
|00004240| 09 09 09 09 09 09 09 53 | 69 7a 65 57 69 6e 64 6f |.......S|izeWindo|
|00004250| 77 20 28 67 4d 6f 6e 69 | 74 6f 72 2c 20 77 69 64 |w (gMoni|tor, wid|
|00004260| 74 68 2c 20 68 65 69 67 | 68 74 2c 20 66 61 6c 73 |th, heig|ht, fals|
|00004270| 65 29 3b 0d 09 09 09 09 | 09 09 09 09 72 65 73 75 |e);.....|....resu|
|00004280| 6c 74 20 3d 20 53 47 53 | 65 74 43 68 61 6e 6e 65 |lt = SGS|etChanne|
|00004290| 6c 42 6f 75 6e 64 73 20 | 28 67 56 69 64 65 6f 43 |lBounds |(gVideoC|
|000042a0| 68 61 6e 6e 65 6c 2c 20 | 26 28 67 4d 6f 6e 69 74 |hannel, |&(gMonit|
|000042b0| 6f 72 2d 3e 70 6f 72 74 | 52 65 63 74 29 29 3b 0d |or->port|Rect));.|
|000042c0| 09 09 09 09 09 09 09 7d | 0d 09 09 09 09 09 09 09 |.......}|........|
|000042d0| 65 6c 73 65 20 69 66 20 | 28 67 48 61 6c 66 53 69 |else if |(gHalfSi|
|000042e0| 7a 65 29 0d 09 09 09 09 | 09 09 09 7b 0d 09 09 09 |ze).....|...{....|
|000042f0| 09 09 09 09 09 77 69 64 | 74 68 20 3d 20 28 6e 65 |.....wid|th = (ne|
|00004300| 77 41 63 74 69 76 65 56 | 69 64 65 6f 52 65 63 74 |wActiveV|ideoRect|
|00004310| 2e 72 69 67 68 74 20 2d | 20 6e 65 77 41 63 74 69 |.right -| newActi|
|00004320| 76 65 56 69 64 65 6f 52 | 65 63 74 2e 6c 65 66 74 |veVideoR|ect.left|
|00004330| 29 20 2f 20 32 3b 0d 09 | 09 09 09 09 09 09 09 68 |) / 2;..|.......h|
|00004340| 65 69 67 68 74 20 3d 20 | 28 6e 65 77 41 63 74 69 |eight = |(newActi|
|00004350| 76 65 56 69 64 65 6f 52 | 65 63 74 2e 62 6f 74 74 |veVideoR|ect.bott|
|00004360| 6f 6d 20 2d 20 6e 65 77 | 41 63 74 69 76 65 56 69 |om - new|ActiveVi|
|00004370| 64 65 6f 52 65 63 74 2e | 74 6f 70 29 20 2f 20 32 |deoRect.|top) / 2|
|00004380| 3b 0d 09 09 09 09 09 09 | 09 09 0d 09 09 09 09 09 |;.......|........|
|00004390| 09 09 09 67 41 63 74 69 | 76 65 56 69 64 65 6f 52 |...gActi|veVideoR|
|000043a0| 65 63 74 20 3d 20 6e 65 | 77 41 63 74 69 76 65 56 |ect = ne|wActiveV|
|000043b0| 69 64 65 6f 52 65 63 74 | 3b 0d 09 09 09 09 09 09 |ideoRect|;.......|
|000043c0| 09 09 53 69 7a 65 57 69 | 6e 64 6f 77 20 28 67 4d |..SizeWi|ndow (gM|
|000043d0| 6f 6e 69 74 6f 72 2c 20 | 77 69 64 74 68 2c 20 68 |onitor, |width, h|
|000043e0| 65 69 67 68 74 2c 20 66 | 61 6c 73 65 29 3b 0d 09 |eight, f|alse);..|
|000043f0| 09 09 09 09 09 09 09 72 | 65 73 75 6c 74 20 3d 20 |.......r|esult = |
|00004400| 53 47 53 65 74 43 68 61 | 6e 6e 65 6c 42 6f 75 6e |SGSetCha|nnelBoun|
|00004410| 64 73 20 28 67 56 69 64 | 65 6f 43 68 61 6e 6e 65 |ds (gVid|eoChanne|
|00004420| 6c 2c 20 26 28 67 4d 6f | 6e 69 74 6f 72 2d 3e 70 |l, &(gMo|nitor->p|
|00004430| 6f 72 74 52 65 63 74 29 | 29 3b 0d 09 09 09 09 09 |ortRect)|);......|
|00004440| 09 09 7d 0d 09 09 09 09 | 09 09 09 65 6c 73 65 20 |..}.....|...else |
|00004450| 69 66 20 28 67 51 75 61 | 72 74 65 72 53 69 7a 65 |if (gQua|rterSize|
|00004460| 29 0d 09 09 09 09 09 09 | 09 7b 0d 09 09 09 09 09 |).......|.{......|
|00004470| 09 09 09 77 69 64 74 68 | 20 3d 20 28 6e 65 77 41 |...width| = (newA|
|00004480| 63 74 69 76 65 56 69 64 | 65 6f 52 65 63 74 2e 72 |ctiveVid|eoRect.r|
|00004490| 69 67 68 74 20 2d 20 6e | 65 77 41 63 74 69 76 65 |ight - n|ewActive|
|000044a0| 56 69 64 65 6f 52 65 63 | 74 2e 6c 65 66 74 29 20 |VideoRec|t.left) |
|000044b0| 2f 20 34 3b 0d 09 09 09 | 09 09 09 09 09 68 65 69 |/ 4;....|.....hei|
|000044c0| 67 68 74 20 3d 20 28 6e | 65 77 41 63 74 69 76 65 |ght = (n|ewActive|
|000044d0| 56 69 64 65 6f 52 65 63 | 74 2e 62 6f 74 74 6f 6d |VideoRec|t.bottom|
|000044e0| 20 2d 20 6e 65 77 41 63 | 74 69 76 65 56 69 64 65 | - newAc|tiveVide|
|000044f0| 6f 52 65 63 74 2e 74 6f | 70 29 20 2f 20 34 3b 0d |oRect.to|p) / 4;.|
|00004500| 09 09 09 09 09 09 09 09 | 0d 09 09 09 09 09 09 09 |........|........|
|00004510| 09 67 41 63 74 69 76 65 | 56 69 64 65 6f 52 65 63 |.gActive|VideoRec|
|00004520| 74 20 3d 20 6e 65 77 41 | 63 74 69 76 65 56 69 64 |t = newA|ctiveVid|
|00004530| 65 6f 52 65 63 74 3b 0d | 09 09 09 09 09 09 09 09 |eoRect;.|........|
|00004540| 53 69 7a 65 57 69 6e 64 | 6f 77 20 28 67 4d 6f 6e |SizeWind|ow (gMon|
|00004550| 69 74 6f 72 2c 20 77 69 | 64 74 68 2c 20 68 65 69 |itor, wi|dth, hei|
|00004560| 67 68 74 2c 20 66 61 6c | 73 65 29 3b 0d 09 09 09 |ght, fal|se);....|
|00004570| 09 09 09 09 09 72 65 73 | 75 6c 74 20 3d 20 53 47 |.....res|ult = SG|
|00004580| 53 65 74 43 68 61 6e 6e | 65 6c 42 6f 75 6e 64 73 |SetChann|elBounds|
|00004590| 20 28 67 56 69 64 65 6f | 43 68 61 6e 6e 65 6c 2c | (gVideo|Channel,|
|000045a0| 20 26 28 67 4d 6f 6e 69 | 74 6f 72 2d 3e 70 6f 72 | &(gMoni|tor->por|
|000045b0| 74 52 65 63 74 29 29 3b | 0d 09 09 09 09 09 09 09 |tRect));|........|
|000045c0| 7d 0d 09 09 09 09 09 09 | 7d 0d 09 09 09 09 09 09 |}.......|}.......|
|000045d0| 0d 09 09 09 09 09 09 2f | 2f 20 48 61 73 20 6f 75 |......./|/ Has ou|
|000045e0| 72 20 63 72 6f 70 20 63 | 68 61 6e 67 65 64 3f 0d |r crop c|hanged?.|
|000045f0| 09 09 09 09 09 09 2f 2f | 20 54 68 69 73 20 63 6f |......//| This co|
|00004600| 64 65 20 73 68 6f 77 73 | 20 68 6f 77 20 74 6f 20 |de shows| how to |
|00004610| 62 65 20 63 72 6f 70 20 | 76 69 64 65 6f 20 70 61 |be crop |video pa|
|00004620| 6e 65 6c 20 66 72 69 65 | 6e 64 6c 79 0d 09 09 09 |nel frie|ndly....|
|00004630| 09 09 09 2f 2f 20 54 77 | 6f 20 69 6d 70 6f 72 74 |...// Tw|o import|
|00004640| 61 6e 74 20 74 68 69 6e | 67 73 20 2d 20 0d 09 09 |ant thin|gs - ...|
|00004650| 09 09 09 09 2f 2f 20 31 | 29 20 42 65 20 61 77 61 |....// 1|) Be awa|
|00004660| 72 65 20 74 68 61 74 20 | 79 6f 75 20 6d 69 67 68 |re that |you migh|
|00004670| 74 20 68 61 76 65 20 62 | 65 65 6e 20 63 72 6f 70 |t have b|een crop|
|00004680| 70 65 64 20 61 6e 64 20 | 61 64 6a 75 73 74 20 79 |ped and |adjust y|
|00004690| 6f 75 72 0d 09 09 09 09 | 09 09 2f 2f 20 20 20 20 |our.....|..//    |
|000046a0| 76 69 64 65 6f 20 77 69 | 6e 64 6f 77 20 61 70 70 |video wi|ndow app|
|000046b0| 72 6f 70 72 69 61 74 65 | 6c 79 0d 09 09 09 09 09 |ropriate|ly......|
|000046c0| 09 2f 2f 20 32 29 20 42 | 65 20 61 77 61 72 65 20 |.// 2) B|e aware |
|000046d0| 74 68 61 74 20 79 6f 75 | 20 6d 69 67 68 74 20 68 |that you| might h|
|000046e0| 61 76 65 20 62 65 65 6e | 20 61 64 6a 75 73 74 65 |ave been| adjuste|
|000046f0| 64 20 61 6e 64 20 61 74 | 74 65 6d 70 74 20 74 6f |d and at|tempt to|
|00004700| 0d 09 09 09 09 09 09 2f | 2f 20 20 20 20 61 63 63 |......./|/    acc|
|00004710| 6f 75 6e 74 20 66 6f 72 | 20 74 68 69 73 2e 20 20 |ount for| this.  |
|00004720| 41 64 6a 75 73 74 69 6e | 67 20 72 65 66 65 72 73 |Adjustin|g refers|
|00004730| 20 74 6f 20 75 73 69 6e | 67 20 74 68 65 20 64 69 | to usin|g the di|
|00004740| 67 69 74 69 7a 65 72 0d | 09 09 09 09 09 09 2f 2f |gitizer.|......//|
|00004750| 20 20 20 20 72 65 63 74 | 20 74 6f 20 22 61 64 6a |    rect| to "adj|
|00004760| 75 73 74 22 20 74 68 65 | 20 61 63 74 69 76 65 20 |ust" the| active |
|00004770| 73 6f 75 72 63 65 20 72 | 65 63 74 20 77 69 74 68 |source r|ect with|
|00004780| 69 6e 20 74 68 65 20 6d | 61 78 69 6d 75 6d 0d 09 |in the m|aximum..|
|00004790| 09 09 09 09 09 2f 2f 20 | 20 20 20 73 6f 75 72 63 |.....// |   sourc|
|000047a0| 65 20 72 65 63 74 2e 20 | 20 54 68 69 73 20 69 73 |e rect. | This is|
|000047b0| 20 75 73 65 66 75 6c 20 | 69 66 20 79 6f 75 27 72 | useful |if you'r|
|000047c0| 65 20 67 65 74 74 69 6e | 67 20 74 68 6f 73 65 20 |e gettin|g those |
|000047d0| 6e 61 73 74 79 0d 09 09 | 09 09 09 09 2f 2f 20 20 |nasty...|....//  |
|000047e0| 20 20 62 6c 61 63 6b 20 | 62 61 6e 64 73 20 6f 6e |  black |bands on|
|000047f0| 20 74 68 65 20 73 69 64 | 65 73 20 6f 66 20 79 6f | the sid|es of yo|
|00004800| 75 72 20 76 69 64 65 6f | 20 64 69 73 70 6c 61 79 |ur video| display|
|00004810| 20 2d 20 79 6f 75 20 63 | 61 6e 20 75 73 65 0d 09 | - you c|an use..|
|00004820| 09 09 09 09 09 2f 2f 20 | 20 20 20 74 68 65 20 63 |.....// |   the c|
|00004830| 6f 6e 74 72 6f 6c 2d 61 | 72 72 6f 77 20 6b 65 79 |ontrol-a|rrow key|
|00004840| 20 73 65 71 75 65 6e 63 | 65 20 74 6f 20 73 68 69 | sequenc|e to shi|
|00004850| 66 74 20 74 68 65 20 61 | 63 74 69 76 65 20 73 6f |ft the a|ctive so|
|00004860| 75 72 63 65 20 0d 09 09 | 09 09 09 09 2f 2f 20 20 |urce ...|....//  |
|00004870| 20 20 72 65 63 74 20 61 | 72 6f 75 6e 64 20 77 68 |  rect a|round wh|
|00004880| 65 6e 20 79 6f 75 27 72 | 65 20 69 6e 20 74 68 65 |en you'r|e in the|
|00004890| 20 63 72 6f 70 20 76 69 | 64 65 6f 20 70 61 6e 65 | crop vi|deo pane|
|000048a0| 6c 0d 09 09 09 09 09 09 | 0d 09 09 09 09 09 09 61 |l.......|.......a|
|000048b0| 64 6a 75 73 74 65 64 41 | 63 74 69 76 65 56 69 64 |djustedA|ctiveVid|
|000048c0| 65 6f 52 65 63 74 20 3d | 20 67 41 63 74 69 76 65 |eoRect =| gActive|
|000048d0| 56 69 64 65 6f 52 65 63 | 74 3b 0d 09 09 09 09 09 |VideoRec|t;......|
|000048e0| 09 69 66 20 28 21 45 71 | 75 61 6c 52 65 63 74 20 |.if (!Eq|ualRect |
|000048f0| 28 26 63 75 72 56 69 64 | 65 6f 52 65 63 74 2c 20 |(&curVid|eoRect, |
|00004900| 26 6e 65 77 56 69 64 65 | 6f 52 65 63 74 29 29 0d |&newVide|oRect)).|
|00004910| 09 09 09 09 09 09 7b 0d | 09 09 09 09 09 09 09 69 |......{.|.......i|
|00004920| 66 20 28 28 6e 65 77 56 | 69 64 65 6f 52 65 63 74 |f ((newV|ideoRect|
|00004930| 2e 6c 65 66 74 20 3c 20 | 67 41 63 74 69 76 65 56 |.left < |gActiveV|
|00004940| 69 64 65 6f 52 65 63 74 | 2e 6c 65 66 74 29 20 7c |ideoRect|.left) ||
|00004950| 7c 0d 09 09 09 09 09 09 | 09 09 28 6e 65 77 56 69 ||.......|..(newVi|
|00004960| 64 65 6f 52 65 63 74 2e | 72 69 67 68 74 20 3e 20 |deoRect.|right > |
|00004970| 67 41 63 74 69 76 65 56 | 69 64 65 6f 52 65 63 74 |gActiveV|ideoRect|
|00004980| 2e 72 69 67 68 74 29 20 | 7c 7c 0d 09 09 09 09 09 |.right) |||......|
|00004990| 09 09 09 28 6e 65 77 56 | 69 64 65 6f 52 65 63 74 |...(newV|ideoRect|
|000049a0| 2e 74 6f 70 20 3c 20 67 | 41 63 74 69 76 65 56 69 |.top < g|ActiveVi|
|000049b0| 64 65 6f 52 65 63 74 2e | 74 6f 70 29 20 7c 7c 0d |deoRect.|top) ||.|
|000049c0| 09 09 09 09 09 09 09 09 | 28 6e 65 77 56 69 64 65 |........|(newVide|
|000049d0| 6f 52 65 63 74 2e 62 6f | 74 74 6f 6d 20 3e 20 67 |oRect.bo|ttom > g|
|000049e0| 41 63 74 69 76 65 56 69 | 64 65 6f 52 65 63 74 2e |ActiveVi|deoRect.|
|000049f0| 62 6f 74 74 6f 6d 29 29 | 0d 09 09 09 09 09 09 09 |bottom))|........|
|00004a00| 7b 0d 09 09 09 09 09 09 | 09 09 69 66 20 28 6e 65 |{.......|..if (ne|
|00004a10| 77 56 69 64 65 6f 52 65 | 63 74 2e 6c 65 66 74 20 |wVideoRe|ct.left |
|00004a20| 3c 20 67 41 63 74 69 76 | 65 56 69 64 65 6f 52 65 |< gActiv|eVideoRe|
|00004a30| 63 74 2e 6c 65 66 74 29 | 0d 09 09 09 09 09 09 09 |ct.left)|........|
|00004a40| 09 7b 0d 09 09 09 09 09 | 09 09 09 09 61 64 6a 75 |.{......|....adju|
|00004a50| 73 74 65 64 41 63 74 69 | 76 65 56 69 64 65 6f 52 |stedActi|veVideoR|
|00004a60| 65 63 74 2e 6c 65 66 74 | 20 3d 20 6e 65 77 56 69 |ect.left| = newVi|
|00004a70| 64 65 6f 52 65 63 74 2e | 6c 65 66 74 3b 0d 09 09 |deoRect.|left;...|
|00004a80| 09 09 09 09 09 09 09 61 | 64 6a 75 73 74 65 64 41 |.......a|djustedA|
|00004a90| 63 74 69 76 65 56 69 64 | 65 6f 52 65 63 74 2e 72 |ctiveVid|eoRect.r|
|00004aa0| 69 67 68 74 20 2d 3d 20 | 28 67 41 63 74 69 76 65 |ight -= |(gActive|
|00004ab0| 56 69 64 65 6f 52 65 63 | 74 2e 6c 65 66 74 20 2d |VideoRec|t.left -|
|00004ac0| 20 6e 65 77 56 69 64 65 | 6f 52 65 63 74 2e 6c 65 | newVide|oRect.le|
|00004ad0| 66 74 29 3b 0d 09 09 09 | 09 09 09 09 09 7d 0d 09 |ft);....|.....}..|
|00004ae0| 09 09 09 09 09 09 09 69 | 66 20 28 6e 65 77 56 69 |.......i|f (newVi|
|00004af0| 64 65 6f 52 65 63 74 2e | 72 69 67 68 74 20 3e 20 |deoRect.|right > |
|00004b00| 67 41 63 74 69 76 65 56 | 69 64 65 6f 52 65 63 74 |gActiveV|ideoRect|
|00004b10| 2e 72 69 67 68 74 29 0d | 09 09 09 09 09 09 09 09 |.right).|........|
|00004b20| 7b 0d 09 09 09 09 09 09 | 09 09 09 61 64 6a 75 73 |{.......|...adjus|
|00004b30| 74 65 64 41 63 74 69 76 | 65 56 69 64 65 6f 52 65 |tedActiv|eVideoRe|
|00004b40| 63 74 2e 72 69 67 68 74 | 20 3d 20 6e 65 77 56 69 |ct.right| = newVi|
|00004b50| 64 65 6f 52 65 63 74 2e | 72 69 67 68 74 3b 0d 09 |deoRect.|right;..|
|00004b60| 09 09 09 09 09 09 09 09 | 61 64 6a 75 73 74 65 64 |........|adjusted|
|00004b70| 41 63 74 69 76 65 56 69 | 64 65 6f 52 65 63 74 2e |ActiveVi|deoRect.|
|00004b80| 6c 65 66 74 20 2b 3d 20 | 28 6e 65 77 56 69 64 65 |left += |(newVide|
|00004b90| 6f 52 65 63 74 2e 72 69 | 67 68 74 20 2d 20 67 41 |oRect.ri|ght - gA|
|00004ba0| 63 74 69 76 65 56 69 64 | 65 6f 52 65 63 74 2e 72 |ctiveVid|eoRect.r|
|00004bb0| 69 67 68 74 29 3b 0d 09 | 09 09 09 09 09 09 09 7d |ight);..|.......}|
|00004bc0| 0d 09 09 09 09 09 09 09 | 09 69 66 20 28 6e 65 77 |........|.if (new|
|00004bd0| 56 69 64 65 6f 52 65 63 | 74 2e 74 6f 70 20 3c 20 |VideoRec|t.top < |
|00004be0| 67 41 63 74 69 76 65 56 | 69 64 65 6f 52 65 63 74 |gActiveV|ideoRect|
|00004bf0| 2e 74 6f 70 29 0d 09 09 | 09 09 09 09 09 09 7b 0d |.top)...|......{.|
|00004c00| 09 09 09 09 09 09 09 09 | 09 61 64 6a 75 73 74 65 |........|.adjuste|
|00004c10| 64 41 63 74 69 76 65 56 | 69 64 65 6f 52 65 63 74 |dActiveV|ideoRect|
|00004c20| 2e 74 6f 70 20 3d 20 6e | 65 77 56 69 64 65 6f 52 |.top = n|ewVideoR|
|00004c30| 65 63 74 2e 74 6f 70 3b | 0d 09 09 09 09 09 09 09 |ect.top;|........|
|00004c40| 09 09 61 64 6a 75 73 74 | 65 64 41 63 74 69 76 65 |..adjust|edActive|
|00004c50| 56 69 64 65 6f 52 65 63 | 74 2e 62 6f 74 74 6f 6d |VideoRec|t.bottom|
|00004c60| 20 2d 3d 20 28 67 41 63 | 74 69 76 65 56 69 64 65 | -= (gAc|tiveVide|
|00004c70| 6f 52 65 63 74 2e 74 6f | 70 20 2d 20 6e 65 77 56 |oRect.to|p - newV|
|00004c80| 69 64 65 6f 52 65 63 74 | 2e 74 6f 70 29 3b 0d 09 |ideoRect|.top);..|
|00004c90| 09 09 09 09 09 09 09 7d | 0d 09 09 09 09 09 09 09 |.......}|........|
|00004ca0| 09 69 66 20 28 6e 65 77 | 56 69 64 65 6f 52 65 63 |.if (new|VideoRec|
|00004cb0| 74 2e 62 6f 74 74 6f 6d | 20 3e 20 67 41 63 74 69 |t.bottom| > gActi|
|00004cc0| 76 65 56 69 64 65 6f 52 | 65 63 74 2e 62 6f 74 74 |veVideoR|ect.bott|
|00004cd0| 6f 6d 29 0d 09 09 09 09 | 09 09 09 09 7b 0d 09 09 |om).....|....{...|
|00004ce0| 09 09 09 09 09 09 09 61 | 64 6a 75 73 74 65 64 41 |.......a|djustedA|
|00004cf0| 63 74 69 76 65 56 69 64 | 65 6f 52 65 63 74 2e 62 |ctiveVid|eoRect.b|
|00004d00| 6f 74 74 6f 6d 20 3d 20 | 6e 65 77 56 69 64 65 6f |ottom = |newVideo|
|00004d10| 52 65 63 74 2e 62 6f 74 | 74 6f 6d 3b 0d 09 09 09 |Rect.bot|tom;....|
|00004d20| 09 09 09 09 09 09 61 64 | 6a 75 73 74 65 64 41 63 |......ad|justedAc|
|00004d30| 74 69 76 65 56 69 64 65 | 6f 52 65 63 74 2e 74 6f |tiveVide|oRect.to|
|00004d40| 70 20 2b 3d 20 28 6e 65 | 77 56 69 64 65 6f 52 65 |p += (ne|wVideoRe|
|00004d50| 63 74 2e 62 6f 74 74 6f | 6d 20 2d 20 67 41 63 74 |ct.botto|m - gAct|
|00004d60| 69 76 65 56 69 64 65 6f | 52 65 63 74 2e 62 6f 74 |iveVideo|Rect.bot|
|00004d70| 74 6f 6d 29 3b 0d 09 09 | 09 09 09 09 09 09 7d 0d |tom);...|......}.|
|00004d80| 09 09 09 09 09 09 09 09 | 6e 65 77 42 6f 75 6e 64 |........|newBound|
|00004d90| 73 20 3d 20 6e 65 77 56 | 69 64 65 6f 52 65 63 74 |s = newV|ideoRect|
|00004da0| 3b 0d 09 09 09 09 09 09 | 09 09 4d 61 70 52 65 63 |;.......|..MapRec|
|00004db0| 74 20 28 26 6e 65 77 42 | 6f 75 6e 64 73 2c 20 26 |t (&newB|ounds, &|
|00004dc0| 61 64 6a 75 73 74 65 64 | 41 63 74 69 76 65 56 69 |adjusted|ActiveVi|
|00004dd0| 64 65 6f 52 65 63 74 2c | 20 26 28 67 4d 6f 6e 69 |deoRect,| &(gMoni|
|00004de0| 74 6f 72 2d 3e 70 6f 72 | 74 52 65 63 74 29 29 3b |tor->por|tRect));|
|00004df0| 0d 09 09 09 09 09 09 09 | 7d 0d 09 09 09 09 09 09 |........|}.......|
|00004e00| 09 65 6c 73 65 09 2f 2f | 20 43 61 6e 27 74 20 74 |.else.//| Can't t|
|00004e10| 65 6c 6c 20 69 66 20 77 | 65 27 76 65 20 62 65 65 |ell if w|e've bee|
|00004e20| 6e 20 61 64 6a 75 73 74 | 65 64 20 28 64 69 67 69 |n adjust|ed (digi|
|00004e30| 74 69 7a 65 72 20 72 65 | 63 74 20 69 73 20 73 6d |tizer re|ct is sm|
|00004e40| 61 6c 6c 65 72 20 6f 6e | 20 61 6c 6c 20 73 69 64 |aller on| all sid|
|00004e50| 65 73 0d 09 09 09 09 09 | 09 09 09 09 2f 2f 20 74 |es......|....// t|
|00004e60| 68 61 6e 20 74 68 65 20 | 61 63 74 69 76 65 20 73 |han the |active s|
|00004e70| 6f 75 72 63 65 20 72 65 | 63 74 29 0d 09 09 09 09 |ource re|ct).....|
|00004e80| 09 09 09 7b 0d 09 09 09 | 09 09 09 09 20 20 20 20 |...{....|....    |
|00004e90| 6e 65 77 42 6f 75 6e 64 | 73 20 3d 20 6e 65 77 56 |newBound|s = newV|
|00004ea0| 69 64 65 6f 52 65 63 74 | 3b 0d 09 09 09 09 09 09 |ideoRect|;.......|
|00004eb0| 09 20 20 20 20 4d 61 70 | 52 65 63 74 20 28 26 6e |.    Map|Rect (&n|
|00004ec0| 65 77 42 6f 75 6e 64 73 | 2c 20 26 67 41 63 74 69 |ewBounds|, &gActi|
|00004ed0| 76 65 56 69 64 65 6f 52 | 65 63 74 2c 20 26 28 67 |veVideoR|ect, &(g|
|00004ee0| 4d 6f 6e 69 74 6f 72 2d | 3e 70 6f 72 74 52 65 63 |Monitor-|>portRec|
|00004ef0| 74 29 29 3b 0d 09 09 09 | 09 09 09 09 7d 0d 09 09 |t));....|....}...|
|00004f00| 09 09 09 09 20 20 20 20 | 77 69 64 74 68 20 3d 20 |....    |width = |
|00004f10| 6e 65 77 42 6f 75 6e 64 | 73 2e 72 69 67 68 74 20 |newBound|s.right |
|00004f20| 2d 20 6e 65 77 42 6f 75 | 6e 64 73 2e 6c 65 66 74 |- newBou|nds.left|
|00004f30| 3b 0d 09 09 09 09 09 09 | 20 20 20 20 68 65 69 67 |;.......|    heig|
|00004f40| 68 74 20 3d 20 6e 65 77 | 42 6f 75 6e 64 73 2e 62 |ht = new|Bounds.b|
|00004f50| 6f 74 74 6f 6d 20 2d 20 | 6e 65 77 42 6f 75 6e 64 |ottom - |newBound|
|00004f60| 73 2e 74 6f 70 3b 0d 09 | 09 09 09 09 09 20 20 20 |s.top;..|.....   |
|00004f70| 20 72 65 73 75 6c 74 20 | 3d 20 53 47 53 65 74 43 | result |= SGSetC|
|00004f80| 68 61 6e 6e 65 6c 42 6f | 75 6e 64 73 20 28 67 56 |hannelBo|unds (gV|
|00004f90| 69 64 65 6f 43 68 61 6e | 6e 65 6c 2c 20 26 6e 65 |ideoChan|nel, &ne|
|00004fa0| 77 42 6f 75 6e 64 73 29 | 3b 0d 09 09 09 09 09 09 |wBounds)|;.......|
|00004fb0| 7d 0d 0d 09 09 09 09 09 | 09 2f 2f 20 43 6c 65 61 |}.......|.// Clea|
|00004fc0| 6e 20 6f 75 74 20 74 68 | 65 20 70 61 72 74 20 6f |n out th|e part o|
|00004fd0| 66 20 74 68 65 20 70 6f | 72 74 20 74 68 61 74 20 |f the po|rt that |
|00004fe0| 69 73 6e 27 74 20 62 65 | 69 6e 67 20 64 72 61 77 |isn't be|ing draw|
|00004ff0| 6e 20 69 6e 0d 09 09 09 | 09 09 09 64 65 61 64 52 |n in....|...deadR|
|00005000| 67 6e 20 3d 20 4e 65 77 | 52 67 6e 28 29 3b 0d 09 |gn = New|Rgn();..|
|00005010| 09 09 09 09 09 69 66 20 | 28 64 65 61 64 52 67 6e |.....if |(deadRgn|
|00005020| 20 21 3d 20 6e 69 6c 29 | 0d 09 09 09 09 09 09 7b | != nil)|.......{|
|00005030| 0d 09 09 09 09 09 09 09 | 72 65 73 75 6c 74 20 3d |........|result =|
|00005040| 20 53 47 47 65 74 43 68 | 61 6e 6e 65 6c 42 6f 75 | SGGetCh|annelBou|
|00005050| 6e 64 73 20 28 67 56 69 | 64 65 6f 43 68 61 6e 6e |nds (gVi|deoChann|
|00005060| 65 6c 2c 20 26 62 6f 75 | 6e 64 73 52 65 63 74 29 |el, &bou|ndsRect)|
|00005070| 3b 0d 09 09 09 09 09 09 | 09 72 65 73 75 6c 74 20 |;.......|.result |
|00005080| 3d 20 58 6f 72 52 65 63 | 74 54 6f 52 67 6e 20 28 |= XorRec|tToRgn (|
|00005090| 26 62 6f 75 6e 64 73 52 | 65 63 74 2c 20 26 28 67 |&boundsR|ect, &(g|
|000050a0| 4d 6f 6e 69 74 6f 72 2d | 3e 70 6f 72 74 52 65 63 |Monitor-|>portRec|
|000050b0| 74 29 2c 20 26 64 65 61 | 64 52 67 6e 29 3b 0d 09 |t), &dea|dRgn);..|
|000050c0| 09 09 09 09 09 09 45 72 | 61 73 65 52 67 6e 20 28 |......Er|aseRgn (|
|000050d0| 64 65 61 64 52 67 6e 29 | 3b 0d 09 09 09 09 09 09 |deadRgn)|;.......|
|000050e0| 09 44 69 73 70 6f 73 65 | 52 67 6e 20 28 64 65 61 |.Dispose|Rgn (dea|
|000050f0| 64 52 67 6e 29 3b 0d 09 | 09 09 09 09 09 7d 0d 0d |dRgn);..|.....}..|
|00005100| 09 09 09 09 09 09 53 65 | 74 50 6f 72 74 20 28 73 |......Se|tPort (s|
|00005110| 61 76 65 64 50 6f 72 74 | 29 3b 0d 09 09 09 09 09 |avedPort|);......|
|00005120| 09 0d 09 09 09 09 09 09 | 2f 2f 20 54 68 65 20 70 |........|// The p|
|00005130| 61 75 73 65 20 74 68 61 | 74 20 72 65 66 72 65 73 |ause tha|t refres|
|00005140| 68 65 73 0d 09 09 09 09 | 09 09 72 65 73 75 6c 74 |hes.....|..result|
|00005150| 20 3d 20 53 47 50 61 75 | 73 65 20 28 67 53 65 71 | = SGPau|se (gSeq|
|00005160| 47 72 61 62 62 65 72 2c | 20 66 61 6c 73 65 29 3b |Grabber,| false);|
|00005170| 0d 09 09 09 09 09 7d 0d | 09 09 09 09 09 62 72 65 |......}.|.....bre|
|00005180| 61 6b 3b 0d 09 09 09 09 | 7d 0d 09 09 09 09 63 61 |ak;.....|}.....ca|
|00005190| 73 65 20 6b 53 6f 75 6e | 64 53 65 74 74 69 6e 67 |se kSoun|dSetting|
|000051a0| 73 49 74 65 6d 3a 0d 09 | 09 09 09 7b 0d 09 09 09 |sItem:..|...{....|
|000051b0| 09 09 69 66 20 28 28 67 | 53 65 71 47 72 61 62 62 |..if ((g|SeqGrabb|
|000051c0| 65 72 20 21 3d 20 30 4c | 29 20 26 26 20 28 67 53 |er != 0L|) && (gS|
|000051d0| 6f 75 6e 64 43 68 61 6e | 6e 65 6c 20 21 3d 20 30 |oundChan|nel != 0|
|000051e0| 4c 29 29 0d 09 09 09 09 | 09 7b 0d 09 09 09 09 09 |L)).....|.{......|
|000051f0| 09 2f 2f 20 44 6f 20 74 | 68 65 20 64 69 61 6c 6f |.// Do t|he dialo|
|00005200| 67 20 74 68 61 6e 67 0d | 09 09 09 09 09 09 72 65 |g thang.|......re|
|00005210| 73 75 6c 74 20 3d 20 53 | 47 53 65 74 74 69 6e 67 |sult = S|GSetting|
|00005220| 73 44 69 61 6c 6f 67 20 | 28 67 53 65 71 47 72 61 |sDialog |(gSeqGra|
|00005230| 62 62 65 72 2c 20 67 53 | 6f 75 6e 64 43 68 61 6e |bber, gS|oundChan|
|00005240| 6e 65 6c 2c 20 30 2c 0d | 09 09 09 09 09 09 09 6e |nel, 0,.|.......n|
|00005250| 69 6c 2c 20 30 4c 2c 20 | 53 65 71 47 72 61 62 62 |il, 0L, |SeqGrabb|
|00005260| 65 72 4d 6f 64 61 6c 46 | 69 6c 74 65 72 50 72 6f |erModalF|ilterPro|
|00005270| 63 2c 20 28 6c 6f 6e 67 | 29 20 53 74 72 69 70 41 |c, (long|) StripA|
|00005280| 64 64 72 65 73 73 20 28 | 28 50 74 72 29 20 67 4d |ddress (|(Ptr) gM|
|00005290| 6f 6e 69 74 6f 72 29 29 | 3b 0d 09 09 09 09 09 7d |onitor))|;......}|
|000052a0| 0d 09 09 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 09 |......br|eak;....|
|000052b0| 09 7d 0d 09 09 09 09 63 | 61 73 65 20 6b 51 75 61 |.}.....c|ase kQua|
|000052c0| 72 74 65 72 53 69 7a 65 | 49 74 65 6d 3a 0d 09 09 |rterSize|Item:...|
|000052d0| 09 09 7b 0d 09 09 09 09 | 09 2f 2f 20 4e 65 77 20 |..{.....|.// New |
|000052e0| 77 69 64 74 68 20 61 6e | 64 20 68 65 69 67 68 74 |width an|d height|
|000052f0| 0d 09 09 09 09 09 77 69 | 64 74 68 20 3d 20 28 67 |......wi|dth = (g|
|00005300| 41 63 74 69 76 65 56 69 | 64 65 6f 52 65 63 74 2e |ActiveVi|deoRect.|
|00005310| 72 69 67 68 74 20 2d 20 | 67 41 63 74 69 76 65 56 |right - |gActiveV|
|00005320| 69 64 65 6f 52 65 63 74 | 2e 6c 65 66 74 29 20 2f |ideoRect|.left) /|
|00005330| 20 34 3b 0d 09 09 09 09 | 09 68 65 69 67 68 74 20 | 4;.....|.height |
|00005340| 3d 20 28 67 41 63 74 69 | 76 65 56 69 64 65 6f 52 |= (gActi|veVideoR|
|00005350| 65 63 74 2e 62 6f 74 74 | 6f 6d 20 2d 20 67 41 63 |ect.bott|om - gAc|
|00005360| 74 69 76 65 56 69 64 65 | 6f 52 65 63 74 2e 74 6f |tiveVide|oRect.to|
|00005370| 70 29 20 2f 20 34 3b 0d | 09 09 09 09 09 0d 09 09 |p) / 4;.|........|
|00005380| 09 09 09 2f 2f 20 53 65 | 74 20 66 6c 61 67 73 20 |...// Se|t flags |
|00005390| 61 6e 64 20 6d 65 6e 75 | 73 0d 09 09 09 09 09 67 |and menu|s......g|
|000053a0| 51 75 61 72 74 65 72 53 | 69 7a 65 20 3d 20 74 72 |QuarterS|ize = tr|
|000053b0| 75 65 3b 0d 09 09 09 09 | 09 67 48 61 6c 66 53 69 |ue;.....|.gHalfSi|
|000053c0| 7a 65 20 3d 20 66 61 6c | 73 65 3b 0d 09 09 09 09 |ze = fal|se;.....|
|000053d0| 09 67 46 75 6c 6c 53 69 | 7a 65 20 3d 20 66 61 6c |.gFullSi|ze = fal|
|000053e0| 73 65 3b 0d 09 09 09 09 | 09 41 64 6a 75 73 74 4d |se;.....|.AdjustM|
|000053f0| 65 6e 75 73 28 29 3b 0d | 09 09 09 09 09 0d 09 09 |enus();.|........|
|00005400| 09 09 09 2f 2f 20 52 65 | 73 69 7a 65 20 74 68 65 |...// Re|size the|
|00005410| 20 6d 6f 6e 69 74 6f 72 | 0d 09 09 09 09 09 47 65 | monitor|......Ge|
|00005420| 74 50 6f 72 74 20 28 26 | 73 61 76 65 64 50 6f 72 |tPort (&|savedPor|
|00005430| 74 29 3b 0d 09 09 09 09 | 09 53 65 74 50 6f 72 74 |t);.....|.SetPort|
|00005440| 20 28 67 4d 6f 6e 69 74 | 6f 72 29 3b 0d 09 09 09 | (gMonit|or);....|
|00005450| 09 09 72 65 73 75 6c 74 | 20 3d 20 53 47 50 61 75 |..result| = SGPau|
|00005460| 73 65 20 28 67 53 65 71 | 47 72 61 62 62 65 72 2c |se (gSeq|Grabber,|
|00005470| 20 74 72 75 65 29 3b 0d | 09 09 09 09 09 72 65 73 | true);.|.....res|
|00005480| 75 6c 74 20 3d 20 53 47 | 47 65 74 43 68 61 6e 6e |ult = SG|GetChann|
|00005490| 65 6c 42 6f 75 6e 64 73 | 20 28 67 56 69 64 65 6f |elBounds| (gVideo|
|000054a0| 43 68 61 6e 6e 65 6c 2c | 20 26 63 75 72 42 6f 75 |Channel,| &curBou|
|000054b0| 6e 64 73 29 3b 0d 09 09 | 09 09 09 6d 61 78 42 6f |nds);...|...maxBo|
|000054c0| 75 6e 64 73 52 65 63 74 | 20 3d 20 67 4d 6f 6e 69 |undsRect| = gMoni|
|000054d0| 74 6f 72 2d 3e 70 6f 72 | 74 52 65 63 74 3b 0d 09 |tor->por|tRect;..|
|000054e0| 09 09 09 09 53 69 7a 65 | 57 69 6e 64 6f 77 20 28 |....Size|Window (|
|000054f0| 67 4d 6f 6e 69 74 6f 72 | 2c 20 77 69 64 74 68 2c |gMonitor|, width,|
|00005500| 20 68 65 69 67 68 74 2c | 20 66 61 6c 73 65 29 3b | height,| false);|
|00005510| 0d 09 09 09 09 09 4d 61 | 70 52 65 63 74 20 28 26 |......Ma|pRect (&|
|00005520| 63 75 72 42 6f 75 6e 64 | 73 2c 20 26 6d 61 78 42 |curBound|s, &maxB|
|00005530| 6f 75 6e 64 73 52 65 63 | 74 2c 20 26 28 67 4d 6f |oundsRec|t, &(gMo|
|00005540| 6e 69 74 6f 72 2d 3e 70 | 6f 72 74 52 65 63 74 29 |nitor->p|ortRect)|
|00005550| 29 3b 0d 09 09 09 09 09 | 72 65 73 75 6c 74 20 3d |);......|result =|
|00005560| 20 53 47 53 65 74 43 68 | 61 6e 6e 65 6c 42 6f 75 | SGSetCh|annelBou|
|00005570| 6e 64 73 20 28 67 56 69 | 64 65 6f 43 68 61 6e 6e |nds (gVi|deoChann|
|00005580| 65 6c 2c 20 26 63 75 72 | 42 6f 75 6e 64 73 29 3b |el, &cur|Bounds);|
|00005590| 0d 0d 09 09 09 09 09 2f | 2f 20 43 6c 65 61 6e 20 |......./|/ Clean |
|000055a0| 6f 75 74 20 70 61 72 74 | 20 6f 66 20 70 6f 72 74 |out part| of port|
|000055b0| 20 77 65 27 72 65 20 6e | 6f 74 20 64 72 61 77 69 | we're n|ot drawi|
|000055c0| 6e 67 20 69 6e 0d 09 09 | 09 09 09 64 65 61 64 52 |ng in...|...deadR|
|000055d0| 67 6e 20 3d 20 4e 65 77 | 52 67 6e 28 29 3b 0d 09 |gn = New|Rgn();..|
|000055e0| 09 09 09 09 69 66 20 28 | 64 65 61 64 52 67 6e 20 |....if (|deadRgn |
|000055f0| 21 3d 20 6e 69 6c 29 0d | 09 09 09 09 09 7b 0d 09 |!= nil).|.....{..|
|00005600| 09 09 09 09 09 72 65 73 | 75 6c 74 20 3d 20 53 47 |.....res|ult = SG|
|00005610| 47 65 74 43 68 61 6e 6e | 65 6c 42 6f 75 6e 64 73 |GetChann|elBounds|
|00005620| 20 28 67 56 69 64 65 6f | 43 68 61 6e 6e 65 6c 2c | (gVideo|Channel,|
|00005630| 20 26 62 6f 75 6e 64 73 | 52 65 63 74 29 3b 0d 09 | &bounds|Rect);..|
|00005640| 09 09 09 09 09 72 65 73 | 75 6c 74 20 3d 20 58 6f |.....res|ult = Xo|
|00005650| 72 52 65 63 74 54 6f 52 | 67 6e 20 28 26 62 6f 75 |rRectToR|gn (&bou|
|00005660| 6e 64 73 52 65 63 74 2c | 20 26 28 67 4d 6f 6e 69 |ndsRect,| &(gMoni|
|00005670| 74 6f 72 2d 3e 70 6f 72 | 74 52 65 63 74 29 2c 20 |tor->por|tRect), |
|00005680| 26 64 65 61 64 52 67 6e | 29 3b 0d 09 09 09 09 09 |&deadRgn|);......|
|00005690| 09 45 72 61 73 65 52 67 | 6e 20 28 64 65 61 64 52 |.EraseRg|n (deadR|
|000056a0| 67 6e 29 3b 0d 09 09 09 | 09 09 09 44 69 73 70 6f |gn);....|...Dispo|
|000056b0| 73 65 52 67 6e 20 28 64 | 65 61 64 52 67 6e 29 3b |seRgn (d|eadRgn);|
|000056c0| 0d 09 09 09 09 09 7d 0d | 09 09 09 09 09 09 0d 09 |......}.|........|
|000056d0| 09 09 09 09 53 65 74 50 | 6f 72 74 20 28 73 61 76 |....SetP|ort (sav|
|000056e0| 65 64 50 6f 72 74 29 3b | 0d 09 09 09 09 09 72 65 |edPort);|......re|
|000056f0| 73 75 6c 74 20 3d 20 53 | 47 50 61 75 73 65 20 28 |sult = S|GPause (|
|00005700| 67 53 65 71 47 72 61 62 | 62 65 72 2c 20 66 61 6c |gSeqGrab|ber, fal|
|00005710| 73 65 29 3b 0d 09 09 09 | 09 09 62 72 65 61 6b 3b |se);....|..break;|
|00005720| 0d 09 09 09 09 7d 0d 09 | 09 09 09 63 61 73 65 20 |.....}..|...case |
|00005730| 6b 48 61 6c 66 53 69 7a | 65 49 74 65 6d 3a 0d 09 |kHalfSiz|eItem:..|
|00005740| 09 09 09 7b 0d 09 09 09 | 09 09 2f 2f 20 4e 65 77 |...{....|..// New|
|00005750| 20 77 69 64 74 68 20 61 | 6e 64 20 68 65 69 67 68 | width a|nd heigh|
|00005760| 74 0d 09 09 09 09 09 77 | 69 64 74 68 20 3d 20 28 |t......w|idth = (|
|00005770| 67 41 63 74 69 76 65 56 | 69 64 65 6f 52 65 63 74 |gActiveV|ideoRect|
|00005780| 2e 72 69 67 68 74 20 2d | 20 67 41 63 74 69 76 65 |.right -| gActive|
|00005790| 56 69 64 65 6f 52 65 63 | 74 2e 6c 65 66 74 29 20 |VideoRec|t.left) |
|000057a0| 2f 20 32 3b 0d 09 09 09 | 09 09 68 65 69 67 68 74 |/ 2;....|..height|
|000057b0| 20 3d 20 28 67 41 63 74 | 69 76 65 56 69 64 65 6f | = (gAct|iveVideo|
|000057c0| 52 65 63 74 2e 62 6f 74 | 74 6f 6d 20 2d 20 67 41 |Rect.bot|tom - gA|
|000057d0| 63 74 69 76 65 56 69 64 | 65 6f 52 65 63 74 2e 74 |ctiveVid|eoRect.t|
|000057e0| 6f 70 29 20 2f 20 32 3b | 0d 09 09 09 09 09 0d 09 |op) / 2;|........|
|000057f0| 09 09 09 09 2f 2f 20 53 | 65 74 20 66 6c 61 67 73 |....// S|et flags|
|00005800| 20 61 6e 64 20 6d 65 6e | 75 73 0d 09 09 09 09 09 | and men|us......|
|00005810| 67 51 75 61 72 74 65 72 | 53 69 7a 65 20 3d 20 66 |gQuarter|Size = f|
|00005820| 61 6c 73 65 3b 0d 09 09 | 09 09 09 67 48 61 6c 66 |alse;...|...gHalf|
|00005830| 53 69 7a 65 20 3d 20 74 | 72 75 65 3b 0d 09 09 09 |Size = t|rue;....|
|00005840| 09 09 67 46 75 6c 6c 53 | 69 7a 65 20 3d 20 66 61 |..gFullS|ize = fa|
|00005850| 6c 73 65 3b 0d 09 09 09 | 09 09 41 64 6a 75 73 74 |lse;....|..Adjust|
|00005860| 4d 65 6e 75 73 28 29 3b | 0d 09 09 09 09 09 0d 09 |Menus();|........|
|00005870| 09 09 09 09 2f 2f 20 52 | 65 73 69 7a 65 20 74 68 |....// R|esize th|
|00005880| 65 20 6d 6f 6e 69 74 6f | 72 0d 09 09 09 09 09 47 |e monito|r......G|
|00005890| 65 74 50 6f 72 74 20 28 | 26 73 61 76 65 64 50 6f |etPort (|&savedPo|
|000058a0| 72 74 29 3b 0d 09 09 09 | 09 09 53 65 74 50 6f 72 |rt);....|..SetPor|
|000058b0| 74 20 28 67 4d 6f 6e 69 | 74 6f 72 29 3b 0d 09 09 |t (gMoni|tor);...|
|000058c0| 09 09 09 72 65 73 75 6c | 74 20 3d 20 53 47 50 61 |...resul|t = SGPa|
|000058d0| 75 73 65 20 28 67 53 65 | 71 47 72 61 62 62 65 72 |use (gSe|qGrabber|
|000058e0| 2c 20 74 72 75 65 29 3b | 0d 09 09 09 09 09 72 65 |, true);|......re|
|000058f0| 73 75 6c 74 20 3d 20 53 | 47 47 65 74 43 68 61 6e |sult = S|GGetChan|
|00005900| 6e 65 6c 42 6f 75 6e 64 | 73 20 28 67 56 69 64 65 |nelBound|s (gVide|
|00005910| 6f 43 68 61 6e 6e 65 6c | 2c 20 26 63 75 72 42 6f |oChannel|, &curBo|
|00005920| 75 6e 64 73 29 3b 0d 09 | 09 09 09 09 6d 61 78 42 |unds);..|....maxB|
|00005930| 6f 75 6e 64 73 52 65 63 | 74 20 3d 20 67 4d 6f 6e |oundsRec|t = gMon|
|00005940| 69 74 6f 72 2d 3e 70 6f | 72 74 52 65 63 74 3b 0d |itor->po|rtRect;.|
|00005950| 09 09 09 09 09 53 69 7a | 65 57 69 6e 64 6f 77 20 |.....Siz|eWindow |
|00005960| 28 67 4d 6f 6e 69 74 6f | 72 2c 20 77 69 64 74 68 |(gMonito|r, width|
|00005970| 2c 20 68 65 69 67 68 74 | 2c 20 66 61 6c 73 65 29 |, height|, false)|
|00005980| 3b 0d 09 09 09 09 09 4d | 61 70 52 65 63 74 20 28 |;......M|apRect (|
|00005990| 26 63 75 72 42 6f 75 6e | 64 73 2c 20 26 6d 61 78 |&curBoun|ds, &max|
|000059a0| 42 6f 75 6e 64 73 52 65 | 63 74 2c 20 26 28 67 4d |BoundsRe|ct, &(gM|
|000059b0| 6f 6e 69 74 6f 72 2d 3e | 70 6f 72 74 52 65 63 74 |onitor->|portRect|
|000059c0| 29 29 3b 0d 09 09 09 09 | 09 72 65 73 75 6c 74 20 |));.....|.result |
|000059d0| 3d 20 53 47 53 65 74 43 | 68 61 6e 6e 65 6c 42 6f |= SGSetC|hannelBo|
|000059e0| 75 6e 64 73 20 28 67 56 | 69 64 65 6f 43 68 61 6e |unds (gV|ideoChan|
|000059f0| 6e 65 6c 2c 20 26 63 75 | 72 42 6f 75 6e 64 73 29 |nel, &cu|rBounds)|
|00005a00| 3b 0d 0d 09 09 09 09 09 | 2f 2f 20 43 6c 65 61 6e |;.......|// Clean|
|00005a10| 20 6f 75 74 20 70 61 72 | 74 20 6f 66 20 70 6f 72 | out par|t of por|
|00005a20| 74 20 77 65 27 72 65 20 | 6e 6f 74 20 64 72 61 77 |t we're |not draw|
|00005a30| 69 6e 67 20 69 6e 0d 09 | 09 09 09 09 64 65 61 64 |ing in..|....dead|
|00005a40| 52 67 6e 20 3d 20 4e 65 | 77 52 67 6e 28 29 3b 0d |Rgn = Ne|wRgn();.|
|00005a50| 09 09 09 09 09 69 66 20 | 28 64 65 61 64 52 67 6e |.....if |(deadRgn|
|00005a60| 20 21 3d 20 6e 69 6c 29 | 0d 09 09 09 09 09 7b 0d | != nil)|......{.|
|00005a70| 09 09 09 09 09 09 72 65 | 73 75 6c 74 20 3d 20 53 |......re|sult = S|
|00005a80| 47 47 65 74 43 68 61 6e | 6e 65 6c 42 6f 75 6e 64 |GGetChan|nelBound|
|00005a90| 73 20 28 67 56 69 64 65 | 6f 43 68 61 6e 6e 65 6c |s (gVide|oChannel|
|00005aa0| 2c 20 26 62 6f 75 6e 64 | 73 52 65 63 74 29 3b 0d |, &bound|sRect);.|
|00005ab0| 09 09 09 09 09 09 72 65 | 73 75 6c 74 20 3d 20 58 |......re|sult = X|
|00005ac0| 6f 72 52 65 63 74 54 6f | 52 67 6e 20 28 26 62 6f |orRectTo|Rgn (&bo|
|00005ad0| 75 6e 64 73 52 65 63 74 | 2c 20 26 28 67 4d 6f 6e |undsRect|, &(gMon|
|00005ae0| 69 74 6f 72 2d 3e 70 6f | 72 74 52 65 63 74 29 2c |itor->po|rtRect),|
|00005af0| 20 26 64 65 61 64 52 67 | 6e 29 3b 0d 09 09 09 09 | &deadRg|n);.....|
|00005b00| 09 09 45 72 61 73 65 52 | 67 6e 20 28 64 65 61 64 |..EraseR|gn (dead|
|00005b10| 52 67 6e 29 3b 0d 09 09 | 09 09 09 09 44 69 73 70 |Rgn);...|....Disp|
|00005b20| 6f 73 65 52 67 6e 20 28 | 64 65 61 64 52 67 6e 29 |oseRgn (|deadRgn)|
|00005b30| 3b 0d 09 09 09 09 09 7d | 0d 09 09 09 09 09 09 0d |;......}|........|
|00005b40| 09 09 09 09 09 53 65 74 | 50 6f 72 74 20 28 73 61 |.....Set|Port (sa|
|00005b50| 76 65 64 50 6f 72 74 29 | 3b 0d 09 09 09 09 09 72 |vedPort)|;......r|
|00005b60| 65 73 75 6c 74 20 3d 20 | 53 47 50 61 75 73 65 20 |esult = |SGPause |
|00005b70| 28 67 53 65 71 47 72 61 | 62 62 65 72 2c 20 66 61 |(gSeqGra|bber, fa|
|00005b80| 6c 73 65 29 3b 0d 09 09 | 09 09 09 62 72 65 61 6b |lse);...|...break|
|00005b90| 3b 0d 09 09 09 09 7d 0d | 09 09 09 09 63 61 73 65 |;.....}.|....case|
|00005ba0| 20 6b 46 75 6c 6c 53 69 | 7a 65 49 74 65 6d 3a 0d | kFullSi|zeItem:.|
|00005bb0| 09 09 09 09 7b 0d 09 09 | 09 09 09 2f 2f 20 4e 65 |....{...|...// Ne|
|00005bc0| 77 20 77 69 64 74 68 20 | 61 6e 64 20 68 65 69 67 |w width |and heig|
|00005bd0| 68 74 0d 09 09 09 09 09 | 77 69 64 74 68 20 3d 20 |ht......|width = |
|00005be0| 67 41 63 74 69 76 65 56 | 69 64 65 6f 52 65 63 74 |gActiveV|ideoRect|
|00005bf0| 2e 72 69 67 68 74 20 2d | 20 67 41 63 74 69 76 65 |.right -| gActive|
|00005c00| 56 69 64 65 6f 52 65 63 | 74 2e 6c 65 66 74 3b 0d |VideoRec|t.left;.|
|00005c10| 09 09 09 09 09 68 65 69 | 67 68 74 20 3d 20 67 41 |.....hei|ght = gA|
|00005c20| 63 74 69 76 65 56 69 64 | 65 6f 52 65 63 74 2e 62 |ctiveVid|eoRect.b|
|00005c30| 6f 74 74 6f 6d 20 2d 20 | 67 41 63 74 69 76 65 56 |ottom - |gActiveV|
|00005c40| 69 64 65 6f 52 65 63 74 | 2e 74 6f 70 3b 0d 09 09 |ideoRect|.top;...|
|00005c50| 09 09 09 0d 09 09 09 09 | 09 2f 2f 20 53 65 74 20 |........|.// Set |
|00005c60| 66 6c 61 67 73 20 61 6e | 64 20 6d 65 6e 75 73 0d |flags an|d menus.|
|00005c70| 09 09 09 09 09 67 51 75 | 61 72 74 65 72 53 69 7a |.....gQu|arterSiz|
|00005c80| 65 20 3d 20 66 61 6c 73 | 65 3b 0d 09 09 09 09 09 |e = fals|e;......|
|00005c90| 67 48 61 6c 66 53 69 7a | 65 20 3d 20 66 61 6c 73 |gHalfSiz|e = fals|
|00005ca0| 65 3b 0d 09 09 09 09 09 | 67 46 75 6c 6c 53 69 7a |e;......|gFullSiz|
|00005cb0| 65 20 3d 20 74 72 75 65 | 3b 0d 09 09 09 09 09 41 |e = true|;......A|
|00005cc0| 64 6a 75 73 74 4d 65 6e | 75 73 28 29 3b 0d 09 09 |djustMen|us();...|
|00005cd0| 09 09 09 0d 09 09 09 09 | 09 2f 2f 20 52 65 73 69 |........|.// Resi|
|00005ce0| 7a 65 20 74 68 65 20 6d | 6f 6e 69 74 6f 72 0d 09 |ze the m|onitor..|
|00005cf0| 09 09 09 09 47 65 74 50 | 6f 72 74 20 28 26 73 61 |....GetP|ort (&sa|
|00005d00| 76 65 64 50 6f 72 74 29 | 3b 0d 09 09 09 09 09 53 |vedPort)|;......S|
|00005d10| 65 74 50 6f 72 74 20 28 | 67 4d 6f 6e 69 74 6f 72 |etPort (|gMonitor|
|00005d20| 29 3b 0d 09 09 09 09 09 | 72 65 73 75 6c 74 20 3d |);......|result =|
|00005d30| 20 53 47 50 61 75 73 65 | 20 28 67 53 65 71 47 72 | SGPause| (gSeqGr|
|00005d40| 61 62 62 65 72 2c 20 74 | 72 75 65 29 3b 0d 09 09 |abber, t|rue);...|
|00005d50| 09 09 09 72 65 73 75 6c | 74 20 3d 20 53 47 47 65 |...resul|t = SGGe|
|00005d60| 74 43 68 61 6e 6e 65 6c | 42 6f 75 6e 64 73 20 28 |tChannel|Bounds (|
|00005d70| 67 56 69 64 65 6f 43 68 | 61 6e 6e 65 6c 2c 20 26 |gVideoCh|annel, &|
|00005d80| 63 75 72 42 6f 75 6e 64 | 73 29 3b 0d 09 09 09 09 |curBound|s);.....|
|00005d90| 09 6d 61 78 42 6f 75 6e | 64 73 52 65 63 74 20 3d |.maxBoun|dsRect =|
|00005da0| 20 67 4d 6f 6e 69 74 6f | 72 2d 3e 70 6f 72 74 52 | gMonito|r->portR|
|00005db0| 65 63 74 3b 0d 09 09 09 | 09 09 53 69 7a 65 57 69 |ect;....|..SizeWi|
|00005dc0| 6e 64 6f 77 20 28 67 4d | 6f 6e 69 74 6f 72 2c 20 |ndow (gM|onitor, |
|00005dd0| 77 69 64 74 68 2c 20 68 | 65 69 67 68 74 2c 20 66 |width, h|eight, f|
|00005de0| 61 6c 73 65 29 3b 0d 09 | 09 09 09 09 4d 61 70 52 |alse);..|....MapR|
|00005df0| 65 63 74 20 28 26 63 75 | 72 42 6f 75 6e 64 73 2c |ect (&cu|rBounds,|
|00005e00| 20 26 6d 61 78 42 6f 75 | 6e 64 73 52 65 63 74 2c | &maxBou|ndsRect,|
|00005e10| 20 26 28 67 4d 6f 6e 69 | 74 6f 72 2d 3e 70 6f 72 | &(gMoni|tor->por|
|00005e20| 74 52 65 63 74 29 29 3b | 0d 09 09 09 09 09 72 65 |tRect));|......re|
|00005e30| 73 75 6c 74 20 3d 20 53 | 47 53 65 74 43 68 61 6e |sult = S|GSetChan|
|00005e40| 6e 65 6c 42 6f 75 6e 64 | 73 20 28 67 56 69 64 65 |nelBound|s (gVide|
|00005e50| 6f 43 68 61 6e 6e 65 6c | 2c 20 26 63 75 72 42 6f |oChannel|, &curBo|
|00005e60| 75 6e 64 73 29 3b 0d 0d | 09 09 09 09 09 2f 2f 20 |unds);..|.....// |
|00005e70| 43 6c 65 61 6e 20 6f 75 | 74 20 70 61 72 74 20 6f |Clean ou|t part o|
|00005e80| 66 20 70 6f 72 74 20 77 | 65 27 72 65 20 6e 6f 74 |f port w|e're not|
|00005e90| 20 64 72 61 77 69 6e 67 | 20 69 6e 0d 09 09 09 09 | drawing| in.....|
|00005ea0| 09 64 65 61 64 52 67 6e | 20 3d 20 4e 65 77 52 67 |.deadRgn| = NewRg|
|00005eb0| 6e 28 29 3b 0d 09 09 09 | 09 09 69 66 20 28 64 65 |n();....|..if (de|
|00005ec0| 61 64 52 67 6e 20 21 3d | 20 6e 69 6c 29 0d 09 09 |adRgn !=| nil)...|
|00005ed0| 09 09 09 7b 0d 09 09 09 | 09 09 09 72 65 73 75 6c |...{....|...resul|
|00005ee0| 74 20 3d 20 53 47 47 65 | 74 43 68 61 6e 6e 65 6c |t = SGGe|tChannel|
|00005ef0| 42 6f 75 6e 64 73 20 28 | 67 56 69 64 65 6f 43 68 |Bounds (|gVideoCh|
|00005f00| 61 6e 6e 65 6c 2c 20 26 | 62 6f 75 6e 64 73 52 65 |annel, &|boundsRe|
|00005f10| 63 74 29 3b 0d 09 09 09 | 09 09 09 72 65 73 75 6c |ct);....|...resul|
|00005f20| 74 20 3d 20 58 6f 72 52 | 65 63 74 54 6f 52 67 6e |t = XorR|ectToRgn|
|00005f30| 20 28 26 62 6f 75 6e 64 | 73 52 65 63 74 2c 20 26 | (&bound|sRect, &|
|00005f40| 28 67 4d 6f 6e 69 74 6f | 72 2d 3e 70 6f 72 74 52 |(gMonito|r->portR|
|00005f50| 65 63 74 29 2c 20 26 64 | 65 61 64 52 67 6e 29 3b |ect), &d|eadRgn);|
|00005f60| 0d 09 09 09 09 09 09 45 | 72 61 73 65 52 67 6e 20 |.......E|raseRgn |
|00005f70| 28 64 65 61 64 52 67 6e | 29 3b 0d 09 09 09 09 09 |(deadRgn|);......|
|00005f80| 09 44 69 73 70 6f 73 65 | 52 67 6e 20 28 64 65 61 |.Dispose|Rgn (dea|
|00005f90| 64 52 67 6e 29 3b 0d 09 | 09 09 09 09 7d 0d 09 09 |dRgn);..|....}...|
|00005fa0| 09 09 09 09 0d 09 09 09 | 09 09 53 65 74 50 6f 72 |........|..SetPor|
|00005fb0| 74 20 28 73 61 76 65 64 | 50 6f 72 74 29 3b 0d 09 |t (saved|Port);..|
|00005fc0| 09 09 09 09 72 65 73 75 | 6c 74 20 3d 20 53 47 50 |....resu|lt = SGP|
|00005fd0| 61 75 73 65 20 28 67 53 | 65 71 47 72 61 62 62 65 |ause (gS|eqGrabbe|
|00005fe0| 72 2c 20 66 61 6c 73 65 | 29 3b 0d 09 09 09 09 09 |r, false|);......|
|00005ff0| 62 72 65 61 6b 3b 0d 09 | 09 09 09 7d 0d 09 09 09 |break;..|...}....|
|00006000| 09 63 61 73 65 20 6b 52 | 65 63 6f 72 64 49 74 65 |.case kR|ecordIte|
|00006010| 6d 3a 0d 09 09 09 09 7b | 0d 09 09 09 09 09 46 53 |m:.....{|......FS|
|00006020| 53 70 65 63 09 74 68 65 | 46 53 53 70 65 63 3b 0d |Spec.the|FSSpec;.|
|00006030| 09 09 09 09 09 6c 6f 6e | 67 09 73 61 76 65 64 44 |.....lon|g.savedD|
|00006040| 69 72 49 44 20 3d 20 2a | 28 6c 6f 6e 67 20 2a 29 |irID = *|(long *)|
|00006050| 20 43 75 72 44 69 72 53 | 74 6f 72 65 3b 0d 09 09 | CurDirS|tore;...|
|00006060| 09 09 09 6c 6f 6e 67 09 | 64 69 72 49 44 3b 0d 09 |...long.|dirID;..|
|00006070| 09 09 09 09 73 68 6f 72 | 74 09 73 61 76 65 64 56 |....shor|t.savedV|
|00006080| 52 65 66 4e 75 6d 20 3d | 20 2a 28 73 68 6f 72 74 |RefNum =| *(short|
|00006090| 20 2a 29 20 53 46 53 61 | 76 65 44 69 73 6b 3b 0d | *) SFSa|veDisk;.|
|000060a0| 09 09 09 09 09 73 68 6f | 72 74 09 76 52 65 66 4e |.....sho|rt.vRefN|
|000060b0| 75 6d 3b 0d 09 09 09 09 | 09 0d 09 09 09 09 09 72 |um;.....|.......r|
|000060c0| 65 73 75 6c 74 20 3d 20 | 46 69 6e 64 46 6f 6c 64 |esult = |FindFold|
|000060d0| 65 72 20 28 6b 4f 6e 53 | 79 73 74 65 6d 44 69 73 |er (kOnS|ystemDis|
|000060e0| 6b 2c 20 6b 44 65 73 6b | 74 6f 70 46 6f 6c 64 65 |k, kDesk|topFolde|
|000060f0| 72 54 79 70 65 2c 20 6b | 43 72 65 61 74 65 46 6f |rType, k|CreateFo|
|00006100| 6c 64 65 72 2c 0d 09 09 | 09 09 09 09 26 76 52 65 |lder,...|....&vRe|
|00006110| 66 4e 75 6d 2c 20 26 64 | 69 72 49 44 29 3b 0d 09 |fNum, &d|irID);..|
|00006120| 09 09 09 09 2a 28 73 68 | 6f 72 74 20 2a 29 53 46 |....*(sh|ort *)SF|
|00006130| 53 61 76 65 44 69 73 6b | 20 3d 20 2d 76 52 65 66 |SaveDisk| = -vRef|
|00006140| 4e 75 6d 3b 0d 09 09 09 | 09 09 2a 28 6c 6f 6e 67 |Num;....|..*(long|
|00006150| 20 2a 29 43 75 72 44 69 | 72 53 74 6f 72 65 20 3d | *)CurDi|rStore =|
|00006160| 20 64 69 72 49 44 3b 0d | 09 09 09 09 09 0d 09 09 | dirID;.|........|
|00006170| 09 09 09 72 65 73 75 6c | 74 20 3d 20 46 53 4d 61 |...resul|t = FSMa|
|00006180| 6b 65 46 53 53 70 65 63 | 20 28 76 52 65 66 4e 75 |keFSSpec| (vRefNu|
|00006190| 6d 2c 20 64 69 72 49 44 | 2c 20 22 5c 70 48 61 63 |m, dirID|, "\pHac|
|000061a0| 6b 20 4d 6f 6f 56 22 2c | 20 26 74 68 65 46 53 53 |k MooV",| &theFSS|
|000061b0| 70 65 63 29 3b 0d 09 09 | 09 09 09 72 65 73 75 6c |pec);...|...resul|
|000061c0| 74 20 3d 20 44 65 6c 65 | 74 65 4d 6f 76 69 65 46 |t = Dele|teMovieF|
|000061d0| 69 6c 65 20 28 26 74 68 | 65 46 53 53 70 65 63 29 |ile (&th|eFSSpec)|
|000061e0| 3b 0d 09 09 09 09 09 72 | 65 73 75 6c 74 20 3d 20 |;......r|esult = |
|000061f0| 43 72 65 61 74 65 4d 6f | 76 69 65 46 69 6c 65 20 |CreateMo|vieFile |
|00006200| 28 26 74 68 65 46 53 53 | 70 65 63 2c 20 27 54 56 |(&theFSS|pec, 'TV|
|00006210| 4f 44 27 2c 20 73 6d 53 | 79 73 74 65 6d 53 63 72 |OD', smS|ystemScr|
|00006220| 69 70 74 2c 0d 09 09 09 | 09 09 09 63 72 65 61 74 |ipt,....|...creat|
|00006230| 65 4d 6f 76 69 65 46 69 | 6c 65 44 6f 6e 74 4f 70 |eMovieFi|leDontOp|
|00006240| 65 6e 46 69 6c 65 20 7c | 20 63 72 65 61 74 65 4d |enFile || createM|
|00006250| 6f 76 69 65 46 69 6c 65 | 44 6f 6e 74 43 72 65 61 |ovieFile|DontCrea|
|00006260| 74 65 4d 6f 76 69 65 2c | 0d 09 09 09 09 09 09 6e |teMovie,|.......n|
|00006270| 69 6c 2c 20 6e 69 6c 29 | 3b 0d 09 09 09 09 09 72 |il, nil)|;......r|
|00006280| 65 73 75 6c 74 20 3d 20 | 53 47 53 74 6f 70 20 28 |esult = |SGStop (|
|00006290| 67 53 65 71 47 72 61 62 | 62 65 72 29 3b 0d 09 09 |gSeqGrab|ber);...|
|000062a0| 09 09 09 72 65 73 75 6c | 74 20 3d 20 53 47 53 65 |...resul|t = SGSe|
|000062b0| 74 44 61 74 61 4f 75 74 | 70 75 74 20 28 67 53 65 |tDataOut|put (gSe|
|000062c0| 71 47 72 61 62 62 65 72 | 2c 20 26 74 68 65 46 53 |qGrabber|, &theFS|
|000062d0| 53 70 65 63 2c 20 73 65 | 71 47 72 61 62 54 6f 44 |Spec, se|qGrabToD|
|000062e0| 69 73 6b 29 3b 0d 09 09 | 09 09 09 72 65 73 75 6c |isk);...|...resul|
|000062f0| 74 20 3d 20 53 47 53 74 | 61 72 74 52 65 63 6f 72 |t = SGSt|artRecor|
|00006300| 64 20 28 67 53 65 71 47 | 72 61 62 62 65 72 29 3b |d (gSeqG|rabber);|
|00006310| 0d 09 09 09 09 09 77 68 | 69 6c 65 20 28 21 42 75 |......wh|ile (!Bu|
|00006320| 74 74 6f 6e 28 29 20 26 | 26 20 28 72 65 73 75 6c |tton() &|& (resul|
|00006330| 74 20 3d 3d 20 6e 6f 45 | 72 72 29 29 0d 09 09 09 |t == noE|rr))....|
|00006340| 09 09 7b 0d 09 09 09 09 | 09 09 72 65 73 75 6c 74 |..{.....|..result|
|00006350| 20 3d 20 53 47 49 64 6c | 65 20 28 67 53 65 71 47 | = SGIdl|e (gSeqG|
|00006360| 72 61 62 62 65 72 29 3b | 0d 09 09 09 09 09 7d 0d |rabber);|......}.|
|00006370| 09 09 09 09 09 72 65 73 | 75 6c 74 20 3d 20 53 47 |.....res|ult = SG|
|00006380| 53 74 6f 70 20 28 67 53 | 65 71 47 72 61 62 62 65 |Stop (gS|eqGrabbe|
|00006390| 72 29 3b 0d 09 09 09 09 | 09 72 65 73 75 6c 74 20 |r);.....|.result |
|000063a0| 3d 20 53 47 53 74 61 72 | 74 50 72 65 76 69 65 77 |= SGStar|tPreview|
|000063b0| 20 28 67 53 65 71 47 72 | 61 62 62 65 72 29 3b 0d | (gSeqGr|abber);.|
|000063c0| 09 09 09 09 09 0d 09 09 | 09 09 09 2a 28 73 68 6f |........|...*(sho|
|000063d0| 72 74 20 2a 29 53 46 53 | 61 76 65 44 69 73 6b 20 |rt *)SFS|aveDisk |
|000063e0| 3d 20 73 61 76 65 64 56 | 52 65 66 4e 75 6d 3b 0d |= savedV|RefNum;.|
|000063f0| 09 09 09 09 09 2a 28 6c | 6f 6e 67 20 2a 29 43 75 |.....*(l|ong *)Cu|
+--------+-------------------------+-------------------------+--------+--------+